Top 10k strings from ZX-Review 1994.03 (1994)(Inforkom)(ru).fdi
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [FDI] (TOSEC-v2006-06-06) /
Back to the directory listing
179 74 58 53 - 52 37 35 . 28 . 25 0 25 . 25 24 . 24 . 24 23 . 22 0 21 0 21 . 21 . 20 . 19 . 19 . 18 . 17 . 17 . 17 15 . 15 . 15 . 14 . 13 . 13 12 UUUUUUUUUUUUUUUUUUU 12 . 12 . 12 . 12 11 . 11 . 11 11 10 ;****************** 10 * * * 9 ;******************* 9 8 8 8 8 7 0 7 0 7 - 6 . 6 5 p$p$p$p$pHpHpHpHplplplp 5 1A D V E N T U R E G A M E S 5 - 5 ). 4 perewod9~isel9iz9 4 : 4 208,208,208,208 4 11,11,11,11 4 0 4 0 4 0 4 " 4 ********************************* 4 ********************************* 4 ... 4 T R - D O S 3 UUUUUUUUUUU 3 FFFFFFFFFFFFFFFFFFFF 3 ? 3 ;********************** 3 ; 3 : 3 : 3 0 3 ... 3 ... 3 . 3 - 0F RRCA 3 , 3 ). 3 ). 3 ). 3 ). 3 ). 3 ". 3 ". 3 "" "" 3 PC-REVIEW 3 ... 3 ; 3 ********************************* 3 3 3 2 ~astx9fajla9 2 zapisatx9sektor 2 zapisatx9dorovku 2 vp$p$p$p$pHpHpHpHplplplp 2 s~itatx9dorovku 2 stro~n=9bukwy 2 sistemnoj9dorovke 2 sektorow>> 2 podtwerdite9 2 perezapisatx 2 p@p@p@p@p@p@p@p 2 nowye_dorovka 2 najti9fajl 2 hhhhhhhhhhho` 2 g$="Step": 2 g$="Cursor": 2 _zamena9diska 2 _wwod9komand 2 _wozwrat9w9 2 _stranica9wpered 2 _stranica9nazad 2 _perekl`~enie9zagl= 2 _perekl`~enie9revimow9 2 _informaciq 2 ^islo9NE9bolx{e 2 Zapustitx9fajl 2 Zapisatx9izmeneniq 2 Zapisatx9dorovku 2 Zapisatx99sektor 2 Wyjti9iz9procedury 2 Wy9uwereny9 2 Wstawxte99prinima`}ij9dis 2 Wstawxte99kopiruemyj99dis 2 Vp$p$p$p$pHpHpHpHplplplp 2 S~itatx99dorovku 2 Swobodno>>>>> 2 Stertyh>>>>>>>> 2 Steretx9mark 2 S=_Peterburg 2 Perwaq9swobodnaq9dorovka>> 2 Pereme}enie9kursora_klawi{ami9kursora 2 Pereimenowat 2 POCMOTP KAPTOTEK 2 Ob?em9fajla9iz 2 O9[9I9B9K9 2 Nowaq9mask 2 Nesankcionirowannaq99kopi 2 Ne9TOT9disk99 2 Na~alo_dor= 2 Na9diske9NET9takogo9fajla 2 Mnogo9sektoro 2 Mnogo9fajlo 2 Mark=9fajlow 2 Kopirowatx9s9 2 Kontrolx9diskow9 2 Konec9_dor= 2 Fajlow>>>>>>>>> 2 Fajlow>>>>> 2 Fajl99su}estwuet 2 Dlina9999fajla>> 2 Disk-Doctor 2 CONVER Comander 2 Adres9zagruzki>> 2 @=Kowalewskij 2 ? 2 ? 2 ? 2 ;-------------------- 2 ;************************ 2 ;*********************** 2 ;***************** 2 ;"sprAjtoB" 2 ;"formAtE rEdAktorA" 2 ; 2 ; 2 ; 2 ; 2 ; 2 : 2 : 2 : 2 : 2 : 2 : 2 : 2 : 2 9zapisatx99katalog 2 9stertyh>>> 2 9prerwatx9operaci 2 9ignorirowatx9fajl 2 9Konec9programmy9 2 9@=Kowalewskij 2 999swobodnoj9zone 2 6p$p$p$p$pHpHpHpHplplplp 2 256128 48: 2 22,12,8,148,149 2 22,11,8,146,147 2 22,10,8,17,2,16,7 2 0 2 0 2 0 2 0 2 0 2 0 2 0 2 ... 2 ... 2 ... 2 . 2 - ********************************* 2 - 1. 2 - CF RST 8 2 ,22528+256 2 ,16384+2048 2 ,," 3A 2 ++++++++++ 2 *REFLECTION 2 ). 2 ). 2 ). 2 ). 2 ). 2 ) 2 'True Vid.' 2 'Inv. Vid.' 2 'Graphics' 2 'Caps Losk' 2 #"a\"c\"e\! 2 "S\"K\"U\#"Y\ 2 ". 2 ". 2 """""""""""""""""""" 2 " 2 " 2 " 2 ! 2 SCORE). 2 INVENTORY. 2 Dizzy-4. 2 ADVENTURE 2 ?(Y/N)";A$ 2 1F RRA 2 "Dizzy-4" 2 TR-DOS 2 Set up, 2 RINT ; FLASH 1; BRIGHT 1; INK 2; 2 HEX'e), 2 REM : LOAD "chr"CODE 64600 260 LET K=L-0.111404*F-349.3830 2 V4.1 All rights reserved 2 Pass 2 errors: 00 2 Pass 1 errors: 00 2 PUSH IY 2 24 PRINT AT 21,5; INK 2;" 2 DEC SP 2 6F LD L,A - L 2 67 LD H,A - H 2 0F RRCA 2 ~~~~~~~~~~~~~~~~~~~~~~~~ 2 30 RANDOMIZE USR 49152 2 20 LOAD "diz4.M"CODE 2 10 CLEAR 40000 2 ~~~~~~~~~~~~~~~~~ 2 Original idea........50% 2 Coding...............50% 2 80 DEFB #80 2 1. 2 ............................. 2 ............................. 2 60 2 50 ************************************* 2 40 * KHABAROVSK - 1992 * 2 30 * Written by M.N.Stinov * 2 10 ************************************* 2 2 2 2 1 }e smotrite (i slu{ae 1 ||xxttppllhhdd`` 1 |ksta klassaq 1 |<<D8xDDDDD< 1 zywa` dalx}e: w |tom izwra{ 1 zy=zy+y(s): 1 zx=zx+x(s): 1 za malym - k 1 zApisAtx sprAjty" 1 zApisAtx fAjl B" 1 zAgruzitx fAjl B" 1 zAdAniE oknA. pri udEr-" 1 yy=yx-zy*w(n): 1 yxvVe#&@%A 1 yx=y-zy*y(v0): 1 yx=y-zy*(y(v0)+y(u8)): 1 yx=(a2*n+s*a3)*n+a1: 1 yx=(a1*n-s*a3)*n+a2 1 yr=(yy-y)* 1 y=yx-y(u9) 1 y=k+y-y(u9): 1 y+b<(yp-py+b)*d 1 y*Gj"bj:Zj2dj:[j2ej 1 xy=x+zx*x(v0): 1 xy=x+zx*(x(v0)+x(u8)): 1 xx=xy+zx*v(n): 1 xx=xx+k*i: 1 xx=xx+(n=u8): 1 xr=(xx-x)* 1 xco txmy ', qwlq`}u` 1 x=xy+x(u9): 1 x=j+x+x(u9): 1 x= y= D 1 x+(xp-px+b)*c>w3 1 x(t)+a7-b: 1 x$=g$+",y": 1 x$=g$+",x": 1 x$=g$+",r": 1 x$=g$+",l": 1 x$="no. of pixels": 1 x$="no. of chars": 1 x$="new attr": 1 x$="change": 1 x$="Vert. Radius": 1 x$="Turn Angle": 1 x$="Start Angle": 1 x$="Space": 1 x$="Rotation": 1 x$="Radius": 1 x$="Pic No.": 1 x$="Pic Mode (p,a,c or d)": 1 x$="No. to save": 1 x$="Mark": 1 x$="Horiz. Radius": 1 x$="Arc Angle": 1 ww=yx*a1-xy*a3: 1 ww=-i*r-j: 1 ww-a1/u8+j: 1 written in TASM, ofcoz). 1 wgfVUDDDCDDTUffvw 1 w1+" saved": 1 w1+" is the wrong type": 1 w$(z)=" ": 1 w$(a)=" ": 1 w |tojpr@r 1 vv=xy*a2-yx*a3: 1 v9,u6;k$(en): 1 v8,v1;bx;","; 1 v4,u5;k$(ed); 1 v4,n0;q$(b+ 1 v3,w0;q$(u9+k); 1 v3,v8;"r,l =";r;",";l; 1 v3,s;"I P B F "; 1 v3,n0;k$(s- 1 v2,v0;"COLOUR"; 1 v2,u6;x;",";y; 1 v1,v3;"0. Main Menu": 1 v1+s*i,v3;i;". Load ";l$(i): 1 v0,v5;"SAVE"; 1 v0,v5;"LOAD": 1 v0,m4;j$(p*p1+b); 1 v(n),w(n): 1 ustAnoBkA zAdErvki" 1 ustAnoBkA proiz-" 1 ustAnoBkA poslEdo-" 1 ustAnoBkA fonA" 1 udAlitx sprAjt" 1 uboot B 1 u&u2u"u4ypi| 1 tut nedawno poqwilasx odna 1 t,v3;"1. ";a$; 1 t,u6;ss;",";tt; 1 stErEtx sprAjt" 1 slEduqwij sprAjt" 1 skroll kuda- 1 screen window 1 s,m4;j$(p*p1+b); 1 rolling sprAjtA" 1 rolling oknA" 1 rEvim rEdAKtorA" 1 rAbotA s sprAjtom" 1 rAbotA s oknAmi" 1 rAbotA s fAjlAmi" 1 r=r-x(v2)* 1 r r r6r&x:r8r r`rfr 1 qsa`}aq. o 1 q zakolebal 1 q wse e{e demiurg ASH i wy0 1 proisXodit" 1 programmistP# 1 problema w tom,! 1 priwetstwu 1 primEhAnia:": 1 prEdyduwij sprAjt" 1 pppppppppp 1 pozwonitx psihiat 1 pokAzAtx sprAjt s mAskoj" 1 pokAz sprAjtA" 1 pod uglom ply 1 pe^atlenie ^to ot 1 pNpNp`p`prprpJ 1 p0p0q(p@q8 1 p,a,c or d 1 p*p3p<pH@Q 1 p*p0p<pHpN 1 p(p(pPp(pPpPpxpPpxpxp 1 p$p,p8p@@L 1 p p(p8p@pHpPp`phpppxp 1 p (0xp5p=pMpUp] e 1 ottuda ws` skanirowannu` IBM' 1 otrAvEniE OknA" 1 otrAvEniE Bokrug gori-" 1 otmEnA izmEnEnij" 1 osnoBnoE mEnq": 1 opyright (C) HiSoft 1987 1 opyright (C) HiSoft 1987 1 onnection are..." (C 1 onditions (LOCAL). 21. OKAY - 1 okonhAniE" 1 o2]j2^j2aj2`j<2 1 o12.tx C 1 o,m3;y;" " 1 o,a;j$(p*p1+b);" ";x;" "; 1 o rEdAktorE" 1 nyE punkty poslE zAdAnia oknA" 1 nameless*Gj 1 nameless 1 na SPACE#% 1 n=s*a1+s*a3+m: 1 n0,v8;"step=";aa;",";bb; 1 n0,v3;"2. ";: 1 n+b,v5;x(n); 1 n+b,v5;x(n): 1 n+b,v5;d$; 1 n+b,u5;y(n): 1 n+b,m3;e$; 1 my tAkvE movEm sdElAtx dla BAs " 1 mulxtiplikAcia" 1 mjgda^[XUROMJGDA?<9742/-+(&$" 1 migAniE (Bkl/Bykl)" 1 majka kalinina, to 1 m4+"0123": 1 m3,v6;n;","; 1 m3,v6;"colour": 1 m3,v3;"3. ";b$ 1 m3,n0;q$(v0+ 1 m11.tx C 1 m+" characters": 1 m 'LORD OF THE RINGS' BY TOLKIEN. knig 1 lu~}e ih. VA 1 lenxkaq, ~umuru 1 left rightup down whole 1 l=x(t)+a7-b: 1 l=x(t)+a7-b 1 l=o(s*z+r+u8+ 1 l,r,u or d 1 kopiroBAniE sprAjtA" 1 kopiroBAniE OknA" 1 klABiwi uprABlEnia" 1 kAtAlog diskA" 1 k=d*d/c/c-b: 1 k+xx+yy+xy+c+yx+h+oc+d+i+j+m+l=n: 1 izmEnEniE rEvimA" 1 ispolxzowanP1 1 iniciAlizAcia" 1 iniciAlizAcia movEt proizBoditx-" 1 informaciq dl 1 inBErsia sprAjtA" 1 inBErsia oknA" 1 imq kotoroj 1 i10.tx C 1 i$=g$+" ": 1 i$="Please try and save it again": 1 i$="Please try again": 1 i$="Please rewind the tape to verify": 1 i$="Maximum "+ 1 i$="Invert 1 i$="Do you wish to overwrite ( 1 h$=h$+","+u$(n+b): 1 h$=h$+" ("+ 1 h$=c$+" has not been verified": 1 h$="window/screen 1 h$="print string": 1 h$="filename": 1 h$="Store is being used for "+l$(m): 1 h$="Enter "+h$: 1 h$="Currently": 1 h$="Completed": 1 graphics software 1 grafiku i muzy 1 goworim o muzyke0B 1 g$=g$+l$(n): 1 g$="block size": 1 g$="Swap Colour": 1 g$="Set Print": 1 g$="Set Colour": 1 g$="Set "+g$: 1 g$="Scroll" 1 g$="Scroll Attr": 1 g$="Save " 1 g$="Reverse": 1 g$="Print block": 1 g$="Pic No.": 1 g$="Pic Mode": 1 g$="Merge": 1 g$="Mark/Space": 1 g$="Magcopy": 1 g$="Load ": 1 g$="Last Plot": 1 g$="Ellipse": 1 g$="Delete ": 1 g$="Cover": 1 g$="Coords. "+ 1 g$="Circle": 1 g$="Change Colour": 1 g$="Brush": 1 fReimport ZX AS 1 eras=eras-1 1 eras=eras-(a$(i,1 1 eras=eras+(a$(i,1 1 ee, A SAM teper 1 ece on kru 1 demiurg ASH 1 d=yp-py+b: 1 d.16 kw.73%q 1 cBEt hErnil" 1 cBEt fonA" 1 c>(w3-x)/t 1 c=xp-px+b: 1 blagodar`Q 1 b,n0;"mode:";j$(p+b); 1 b,a;d$;d$;d$: 1 b*&]"-a!/a"&]> 1 b$=b$+"n)" 1 arkostx (Bkl/Bykl)" 1 a=a+s*(k-1 1 a3=vv*ww*k: 1 a2=ww*ww*k+b: 1 a1=vv*vv*k+b: 1 a,v6;j$(p+b); 1 a,a;" ";d$;d$; 1 a$=s$(s)+t$(n): 1 a$=g$+" too thin": 1 a$=a$+" too big": 1 a$=a$+" stored": 1 a$=a$+" copied": 1 a$=a$+" "+ 1 a$="top right" 1 a$="no room" 1 a$="lower left": 1 a$="copy "+s$(s): 1 a$="01234": 1 a$="0123"+ 1 a$(x)=a$(y): 1 a$(x)=a$(y) 1 a teperx q budu goworitx bez 1 ``ddhhllppttxx|| 1 _2. 1 _2). 1 _1). 00510 CALL FNAME 1 Yp$p$p$p$pHpHpHpHplplplp 1 Y091.tx C 1 Y. NOT BAD,YEAH! ) 1 X OR CS+X=DIR SHOW 1 WOULD ONLY 1 WINDOW MENU": 1 WINDIoW.... 1 WDO YOU REALLY 1 WANT TO QUIT? 1 W AND R WORKS WITH CURRENT 1 VIEW......... 1 V090.tx C 1 V 3.02R 512K 1 V 3.02R 128K 1 TOP (wpro~em esli ubra 1 TO VELSOFT AND JMS!_H 1 TI-CHRIST,! 1 THE S P R I T E M E N T 1 THE FUCKINGSA 1 THANKS TA/ 1 TEN BY ME, 1 TAPE ERROR 1 T","K-KOCM L- 1 Size Y :000 1 Size X :000 1 Set values 1 Set device 1 Scale Inc. 1 Sam 10.96 $ 1 SURE DELETE? 1 STUDIO COMPILER 1 SS+W <> - 1 SS+Q <= - 1 SS+I - 1 SS+Enter - 1 SS+E >= - 1 SPRITEMENT 4.3 BY VAG 04.07.93 FILE: T: S: A: (V)IEW(X)CAT(B)ACK(N)EW(SSF)EDIT(W)RITE(R)EAD(S)AVE(L)OAD(12)<-> 1 SPRITE..... 1 SPRITE MENU": 1 SPRITE EDITOR v2.1 1 SPRITE EDITOR V2.1 1 SOUND TRACKER COMPILATION OF POW 1 SM'a. WARNING!! 1 SET VALUES 1 SET DEVICE.. 1 SET DELAY.... 1 SAVE FILE: 1 SAVE FILE... 1 SAVE DATA... 1 SA software productions : 1 S.T.PRO 1996 COMPILATION OF SANDMAN BY DEMIURG 1 S PART YOU MAY SEE SC 1 S 'MANOWAR', 1 S & MUSIC W 1 Rotation = 1 Rot. Inc. = 1 Reset 1 to 8 1 Reset 0 to 9 1 RESTORES THE DISK 1 RE-READ TEXT 1 QWERTPOIUYASDFG 1 QUIT....... 1 QAOPSPC/KEMPSTON 1 QAOP,SP ili kEMPSTON 1 Press no. of option 1 Picture ElementsUDGs Screen g 1 Picture no.= 1 P\=]Z(boot BU(U() 1 PROGRAMMED DRAW PARAMETERS 1 PRINTADD COMM DIFF 1 PRINT DECIMAL 1 PRESS ANY KEY": 1 PRESS A KEY 1 POBKA -4": 1 PIDERGROUP), 1 PARTS OF SPRITEMENT: 1 PAMM B KAPTOTEKE ";n: 1 [email protected] 1 OhistkA OknA": 1 Official distributer 1 OVERWRITE ? 1 OTHOCTb n/216d. n=";q: 1 OOM-METAL GROUP. YOU MU 1 OHOK(OT 3 1 OFF ON TO FROM UNSETSET 1 OF SCREEN (UPPER 16 LINES). 1 O HOMEPA?";N1 1 O CTPOK B CTPAH 1 Normal order 1 NORMAL ORDER. 1 NO GRAPHICS 1 NENTER TO RETURN 1 Master Assembler v1.0 for 128k Speccy only! 1 MY PROGS (1-3), 1 MUSIC-MACKER! 1 MPEX ALBUM (6).MUSIC WHICH 1 MOVE SPEEDS : 1 MNB!@#$%_)('& 1 MAY SEE EXCEPTIONAL EFFECT. 1 MAX IWAMOs! 1 M$="3563568568:68:;8:;8:68563525" 1 LOAD FILE... 1 LISTEN IT. 1 LINE:0000 COL:00 F:L TEXT:0000/FFFF BUF:0000/4000 FILE:........ 1 LEONARDO error trap. 1 L08.tx C 1 L AND S WORK WITH FILES. 1 Initialize 1 IS IMPOSSIBLE 1 IS IMPOSSIBLE 1 INSERT DISK 1 INITIALIZE. 1 INITIALIZE mENU": 1 INITIALIZE 1 IN HIS PART 1 ICOLOR PICS & BORDER AY-INDICATOR. 1 I LOVE MY DU 1 HTEP -6" : 1 HEAR WROTE 1 HCIAQK!=9N;"( 1 HAVE BEEN PROTECT 1 GREETING FROM HELL ! THAT'S AGAIN DEMIURGE ASH WITH MULT 1 GOLDEN DISK 1 GGGGGGGGGGFF 1 GGGGFFFFFF 1 GENTLEMENq 1 Figure table 1 FUCK YOUDOIN' HERE, SHITMAN? 1 FRIEND: DYA 1 FILE....... 1 FILE MENU": 1 FILE ABSENT 1 FIGURE TABLE 1 FFFFFFFFFF 1 F 2008 2090 JR NZ,L7 ; 1 Esli zAintErEsoBAlisx,to zBonitE" 1 Edit sprite:000 Quantity:000 1 Edit order 1 EXECUTE...... 1 ENTER continue : SPACE abort 1 ENTER FILE NAME : 1 EDIT ORDER... 1 E -2" 1 Draw table 1 Deznya by Dyad 1 DISKEDMAX IWAMOTO 1 DISK HEAD POSITION. 1 DISK ABSENT 1 DISK ERROR 1 DESTOY, POSSIBLY? 1 DEMIURGE ASH 1 DELIRIUM: R!B 1 DELAY(1-15): 1 DEFW - DW; DEFS - DS. 1 DEATH-METAL 1 DDD<D|D@pDD 1 D=92@up3@3 1 D<D<DDDDD<< 1 D8H8<8H8DDD 1 D-distchor 1 D HL,XXYY ;XX 1 Created by 1 Coords. to 1 CURSOR PLOT UNPLOT INVERT PICTUREMAGCOPYFIGURE COLOUR PRINT COLCOPYMAGCOPY 1 CS+L & CS+S SAVES/LOADS TWO PART 1 CS+9 GRAPH - 1 CS+8 ===> - 1 CS+7 || - 1 CS+6 \/ - 1 CS+5 <=== - 1 CS+4 I.VIDEO - 1 CS+3 T.VIDEO - 1 CS+2 C.LOCK - 1 CS+1 EIDT - 1 CS+0 DELETE - 1 CREDITS : 1 CREATED BY FDI" 1 CKA -8": 1 CKA -9" 1 CK HOMEP ";h$: 1 CK -7": 1 CATALOGUE... 1 C MASTERS OF UNIVERSE 1 C GREAT ESCAPE 1 C GREEN BERET 1 C BATMAN-3 1 C VENOM 1 C 1 Bybor nAkopitEla" 1 BstABitx sprAjt" 1 Brush mode= 1 Boot BU(U() 1 Background 1 BDDDD@DDHDD 1 BACKGROUND... 1 B8x<D8x8D<< 1 B mEnq rAbotAET kAk 1 B DDCB0046 2080 BIT 0,(IX) ; 1 AUTHOR MR.VAG THANKS FOR USING 1 ATb?(0-HET)" 1 ANIMATION.. 1 ANIMATION MENU": 1 AND PRESS A KEY 1 AND LEFT<->RIGHT MOVING. 1 ABOUT...... 1 A B-ABTO","C-C 1 ?). 41. EQU - 1 ?" 1 ?!) DELIRIUM MULTIDEM@p 1 ?!!". 1 ? / Yes,No /";: 1 ? 4. Flares - 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 ? 1 =>RR=#18-Y, 1 =071.tx C 1 <x8888D8DDDDDDD>~< 1 <T<xTDDDD><<< 1 <T8xTrDDDDDDDDDDD< 1 <NONE> 1 <B|T|DDDD8 1 <<DDD<<xx(8| 1 <<D8xDDDDDDDDDD<< 1 ;j$(bd+s,b): 1 ;================ 1 ;=============== 1 ;--------------- 1 ;******************** 1 ;* bit 0- Save 1=Yes 1 ;* BIG FONT (Ballbr.2) * 1 ;* #3D13 EMMULATION 1 ;"~PROGRAMS BANK~ v9.4"; 1 ;"zontAlxnoj ili BErti-" 1 ;"tElxnosti prokrutki" 1 ;"kursorom nA linzE i B mEnq" 1 ;"kAlxnoj osi" 1 ;"izmEnEniE rAzmEroB oknA" 1 ;"INSERT PAPER 1 ;"File ~bank~ not found": 1 ;"CURSOR"; 1 ;"CORRECTED BY"; 1 ;"C 19-00 do 21-00" 1 ;"BOlxnoj poslEdoBA-" 1 ;"BCTABbTE 1 ;"BAtElxnoj prokrutki" 1 ;"(mAskA/sprAjt)" 1 ;"(Bykl/poln/wAXm)" 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 :djT_:ej=G 1 :SPRITE EDITOR v2.1 1 :HZH[H\H?^%]V 1 :";N: BEEP .1,7 1 :";MST; 1070 IF M>=3 THEN GO TO 1090 1 :";INT ABS SK;" 1 :";FAZ EP .1,7: INPUT " 1 :";DI 1020 CLS : LET K=31: LET M=12: L 1 :";BSAN;" 1 : WEST 5 NORTHE- 1 : RANDOMIZE USR 15619: =ANGLE 1 : Printer. 1 : Ocean. 1 : LIST - BREAK - EDIT. 1 : DEFB 101,78,68) F970 1F AF CB EF ED 79 AF ED 1 : 9000 LPRINT CHR$ 27 + 1 : 6D8D D1 POP DE. 1 : 243, 33, 0, 0, 34, 247, 247, 1 : 1.1. END MOVE - 1 : #6D29...#6D2B - 1 : "You can't", 1 : "OCEAN". 1 : "FILE NAME:" 1 : "0" - 1 : LD HL,#0005 1 : LD (IX+0),#05 1 : GO TO, TAKE, GIVE, 1 : Disk uti- 1 : "a key". 1 : SINCLAIR, CURSOR, 1 : DEFB - DB; 1 : 255 - "Turns". 1 : "7" - 1 : V - Retry constant 3 1 : CHR$ 120 + CHR$ 1 1 : (CORSARIOS), 1 : LD (nn),A 1 : 1.6. DROP 1 : F938 0D CD 08 F9 3E 00 CD 08 1 : 6D46 09 ADD HL,BC 1 : Objects. 1 : 1. Scanner Unit - 1 : D - Carriage return 13 1 : R - Reset monitor 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 : 1 9{~2gz#~2u 1 9is a professional 1 9849 1700 CALL TONE ; 1 98,64,50,0 1 93 S - Side Double/One 1 93 P - Speed High/Half/ 1 93 T - Track 80/40 1 93 /Half-low/Low 1 9,5,4,2,2,1,0,0 1 9 7430 RET ;( 1 9 2590 RET ; 1 9 1960 RET ; 1 88DT8x8xDDDDD< 1 81,81,144,0 1 7!?l"%!`=9 1 7 FE0D 2060 CP #0D ; 1 67,64,127,0 1 64,128,0,0 1 6070.tx C 1 58,10,178,0 1 5544322100/..-,, 1 5 CHANGING ALGORITHM OF MOVEMENT 1 46000;2300 1 406.tx C 1 4-5) AND A COV 1 4- DosVer 1=5.03 * 1 33,33,17,17,8 1 32,21,0,#FF 1 32,159,160,161,#FF 1 3.znAhEnia pEriodA ABtopoBtorA i" 1 3.VIEWER V 1 3.SS+LEFT/RIGHT 1 3. Load graphics 1 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1 2~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1 2~~~~~~~~~~~~~~~ 1 2Venom Strikes Back 1 2The Graphic Adventure Creator 1 2Scorpion ZS-256 1 2Memory Editor 1 2Masters of Universe 1 2Laser Squad 1 2LASER SQUAD 1 2Green Beret 1 2Great Escape 1 255,255,192,223 1 255,0,255,255 1 254,2,194,250 1 252,2,130,132 1 251,3,255,255 1 23 INC HL 6D28: EC CD 18 03 C3 4C 01 22 :9B 1 223,192,255,255 1 22,7,13,16,1,17,7 1 22,20,1,16,6,17,0 1 213,85,88,0 1 204,168,166,0 1 201,81,145,0 1 2.FIRE+UP/DOWN 1 2.EDITOR SS+FIRE 1 2.10.95. 1 2. Save graphics 1 2- ErCod 1=ReOnly* 1 2"STAR INHERITANCE" (C)1994 1 2 THE GRAPHIC ADVENTURE CREATOR 1 2 MEMORY EDITOR 1 1ture Writing System). 1 1VIEW, ZX- 1 1TR-DOS - 1 1IL, GAC (Graphic Adventure Crea- 1 1ADVENTURE GAMES 1 1A4A 2000 CALL PRESS ; 1 1996 KOVROV CITY 1 1993 MOSCOW": 1 194,2,254,0 1 170,170,146,0 1 17,33,163,0 1 162,163,164,#FF 1 154,155,156,157 1 150,151,152,153 1 148,21,1,16,1,17,0 1 147,21,1,16,1,17,0 1 144,160,32,64 1 144,144,80,0 1 132,136,136,16 1 127,64,67,95 1 1234509876qwertpoiuyasdfg 1 1.kopiroBAniE sprAjtA B mAsku" 1 1.UP/DOWN 1 1.PICTURE OUT 1 1. Create graphics 1 1- First char 1 1 AND 2 MOVE SPRITE <> 1 1 30F1 2030 JR NC,L6 ; 1 0SAVE CODE 1 000. 1 00 (23296). 1 0,2,165,81 1 0,192,164,170 1 0,144,80,89 1 0,128,27,42 1 0,128,213,153 1 0,11,9,145 1 0,1,149,89 1 0,0,18,171 1 0 01660 CALL #F503 02230 LD A,(HL) 1 0 00540 XOR A 01100 JP #F1B3 1 0 RESET. 1 0 MONS-4 1 0 CAPS SHIFT 1 0 6D60 1 0 6D58: 1 0 6D50: 23 72 E1 18 E1 3E C3 32 :5F 1 0 6D48: 1 0 6D40: D5 E5 5E 23 56 EB 09 11 :43 1 0 (LOAD, SAVE). 1 0 6908166,0.0933865,1.5236883,1.84 1 0 4435,76.4997524,16.92,1.721E-5 1 0 2895792,0.0067826,0.7233316,3.39 1 0 00200 SAVE CALL #E4E3 1 0 00190 JR END 1 0 00180 JR Z,LOAD 1 0 00170 CP 76 1 0 00160 JR Z,SAVE 1 0 00150 CP 83 1 0 00140 CALL Z,P0 1 0 00130 CP 119 1 0 00120 CALL Z,P0 1 0 00110 CP 113 1 0 00100 ORG #F980 1 0 00090 JP #F980 1 0 00080 NOP 1 0 303 DATA 1.88089,126.30783,335. 1 0 210000 LD HL,START 1 0 110000 NEXT_A LD DE,KEY-ADR 1 0 010000 LD BC,LENGTH 1 0 S - 1 0 2. 1 0 1983-1984 1 0 ADVENTURE GAMES 1 0 4. 1 0 The CAT 89 1 0 S - Print screen positive 1 0 P - Printer 1 0 K - Keyboard monitor 1 0 0 - Previous menu 1 0 ~~~~~~~~~~~~~~~~~ 1 0 6D38: 56 23 7A B3 28 17 EB 09 :7E 1 0 6D30: 00 00 21 1 0 2- 1 0 F6 40 OR 40H 1 0 1A NEXT_B LD A,(DE) 1 0 7C LD A,H 1 0 6D32 211203 LD HL,#0312 1 0 C - Keyboard computer 1 0 96 1 0 2 1 0 72 1 0 49 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 .284 1 .........700 1 ..................64 1 ..................10 1 ...................9000 1 .....................1023 1 .................................... 1 ............... 1 ............ 1 ..."). A,R...). 1 ... " 1 ... - 1 ... 1 ... 1 ... 1 ... 1 ... 1 ... 1 ... 1 ., N7 1988 1 ., 1994. 1 ., 1 .)?";H 310 PRINT AT 18,0; INK 4;" 1 .); 1 .). 1 .). 1 .(GMT)": 320 IF D>=0 AND D<90 THEN PRIN 1 ." ELONG;" 1 ." 700 BEEP .7,7: PAUSE 0: BEEP .1 1 ." 1200 RETURN 1 ." ET G=1979: GO SUB 1070: LET D(1) 1 ." 1080 LET M=M+12: LET G=G-1 1 ." 1 ." 1 . poslE zAprAwiBA-" 1 . ostAlx-" 1 . B7 ED 52 EB E1 73 :89 1 . 956-16-31 1 . 15.00. 1 . 14.00. [2] " 1 . 13.00. 1 . 09 5E 23 :5D 1 . 02.05 1 . (C) 1994 1 . "VA PRINT"). 1 . "Sinclair Direct" 1 . "; 1 . N 11-12 ( 1 . N 5-6 1 . CLOAKING DEVICE 1 . 210, N11-12, 1 . 13.30. 1 . N9 1987 1 . LIST (WITH) WAIT END. 1 . IBM, 1 . 23296 1 . 117). 1 . 243 - "Press a key for another 1 . 24. CARR - 1 . "4" - 1 . 7B LD A,E 1 . 1992 1 . 1982- 1 . Graphics ( 1 . 1. 1 . " THEN POKE VAL "49152",PEEK VAL 1 . 70 1 . 6DC8: 12 FE 30 38 F1 FE 47 30 :13 1 . 46. CTR - 1 . 1.2. OPEN/CLOSE 1 . 77 LD (HL),A 1 . 35. OR - 1 . 34. DESC - 1 . " 1 . XOR (HL) 1 . C36F F1 POP AF 1 . - Dizzy-3 1 . 6D3F 09 ADD HL,BC 1 . NEXT LD A,XX - 1 . C9 RET 1 . ME) 1 . 00350 CALL FNAME 1 . POP BC 1 . Noun ( 1 . 00470 LOAD CALL NAME 1 . OBJECT - 1 . 37. TURN - 1 . " 1 . 38. STRE - 1 . " 1 . . LD HL,#0000 1 . "3" - 1 . 28F2 JR Z,NEXT_B 1 . 20. PICT - 1 . ********************************* 1 . Program). 1 . 3 LD A,#7F 1 . ~~~~~~~~~~~~~~~~ 1 . 80 1 . 78 1 . 76 1 . 00370 JP NZ,ERR 1 . 00360 CP 255 1 . AGILITY - 1 . 9010 LET MJ=DS-LP: LET CPL=(ATN 1 . 75 1 . 230 LET E=360*0.016718*SIN (M/1 1 . P - Stop byts 2 1 . 91 1 . " 1 . O TO 50 1 . 18 1 . 0F RRCA 1 . 32. WAIT - ? 1 . 00340 LD (BUF),A 1 . 39. DECR - 1 . " 1 . 6D68: D7 18 F8 DD E5 E5 D5 C5 :FD 1 . 40. INCR - 1 . 30. WITH - 1 . SUPER B 1 . 250 - "And you took". 1 . 00310 SAVEF CALL NAME 1 . 00040 IN A,(254) 1 . - 1 . STAMINA - 1 . DOS 1 . 65 LD H,L 1 . 27. AVAI - 1 . - 1 . 00110 LD BC,#1FFD 1 . Z - 1 . * * * 1 . * * * 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 -uprABlEniE" 1 -erase adventure. W - VIEW 1 -PLANKTON-. 1 -93 N3-4, 1 -92, N5-6, 1 -91, N11-12). 1 -90". 1 -90 1 -41, 1 ------------------------------------------- 1 -(2 3HAKA)";h$: 1 - tor", 1 - the next platform to follow! 1 - that". 1 - terprize Board) 1 - see". 1 - ridge Computer Ltd. 1 - iS-DOS, 1 - here". 1 - gons). 1 - ding System), 1 - action points, 1 - Wheel. 1 - URS". 1 - TRANSMOGRIFY, VALKYR, PETALS. 1 - TR-DOS 48. 1 - TOR. 1 - Scorpion' 1 - SWITCH BLADE 2 (Gremlin Grap- 1 - RE). 1 - MOBILE 1 - KEMPSTON. 1 - IBM). 1 - HL - 1 - DISK. 1 - ADVENTURE, 1 - ADD A,40H 1 - A.T.F., 1 - 956-16-31 1 - 6DA0: 00 CB 27 CB 27 CB 27 CB :AE 1 - 6D90: E1 C9 21 F8 01 CD 02 00 :90 1 - 6D88: CD B5 03 F1 C1 D1 E1 DD :BB 1 - 6D70: 21 3B 5C CB AE CB 6E 28 :6F 1 - 6D60: 02 02 03 1A 13 FE FF C8 :C6 1 - 69,95 1 - 254), 1 - 24576 1 - - POKE 30273,180. 1 - - 38478,0. 1 - (SS+8) 1 - (SCRAP YARD). 1 - (N9-10, 1 - (14), 1 - "tlw2ms" 1 - "The door is already open" 1 - "MOONBASE ASSAULT", 1 - "C15". 1 - "128 kbyte only". 1 - "#0", 1 - XT J: PRINT AT 5,21;" 1 - 9000 REM 1 - 4317": POKE VAL "23739",CODE "o" 1 - 2 LOOP CALL TITRE 1 - 152",PEEK VAL "23760": POKE VAL 1 - 1 CALL INIT 1 - 00450 LEND1 CALL 15635 1 - 00440 LD C,11 1 - 00430 EX DE,HL 1 - 00400 INC HL 1 - 00380 LD DE,(#FD00) 1 - 00320 JR C,END 1 - "DIZZY.2"CODE : LOAD "DIZZY.3"CO 1 - ";: PRINT AT 5,21; INK NK;D$ 1 - NN+9 AF XOR A 1 - NN+6 01 05 01 LD BC,#0105 1 - NN+10 CD 13 3D CALL #3D13 1 - NN+0 21 00 5B LD HL,#5B00 1 - INK 3;" 1 - FB EI 1 - C8 RET Z 1 - 220 LET M=N-3.762863: LET ANGLE 1 - 200 IF A$="y" OR A$="Y" THEN G 1 - ~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1 - [6] " 1 - [3] 1 - [1] 1 - WEAPON SKILL - 1 - V - FLASH 1 - SOUND - 1 - P-printer menu ( 1 - Objects ( 1 - Main menu: ( 1 - Low priority conditions ( 1 - HEAVY LASER - 1 - E6 07 AND 7 1 - DI 1 - DEC SP 1 - DAGGER - 1 - CONSTITUTION - 1 - CLOSE COMBAT - 1 - C36E 12 LD (DE),A 1 - Begin Where? ( 1 - AP 50 GRENADE - 1 - ACTION POINTS - 1 - 9. 1 - 7B LD A,E 1 - 7. Shield Power Lewel - High - 1 - 6D42 5E LD E,(HL) 1 - 6D3E EB EX DE,HL 1 - 6D3B B3 OR E 1 - 6D39 23 INC HL 1 - 6D38 56 LD D,(HL) 1 - 6D36 5E LD E,(HL) 1 - 6. 1 - 50 LOAD "DIZZY.4" CODE: OUT VA 1 - 5. END TURN - 1 - 45. OBJ - 1 - 4.4. PRISON CAMP ( 1 - 4.2. HARBOUR ( 1 - 3. Missiles - 1 - 3. 1 - 254 - "Okay". 1 - 253 - "You can also see". 1 - 252 - "I can't find that anyw- 1 - 249 - "Your score was". 1 - 246 - "You haven't got that". 1 - 245 - "You've already got 1 - 242 - "Pardon?". 1 - 241 - "You can't". 1 - 22. DROP - 1 - 20 BORDER NOT PI: CLEAR VAL "2 1 - 2. Compass /Adf - 1 - 2. 1 - 19. TEXT - 1 - 18. EXIT - 1 - 15 1 - 10 REM LOADER FOR DIZZY-3 1 - 1.8. SCANNER - 1 - 00100 PUSH AF 1 - 00030 JP NC,#0D00 1 - 00020 L1 CALL #1F54 1 - 00010 PUSH AF 1 - - I believe that the IBM PC is 1 - - 1 - #6D2F...#6D62 - 1 - "Z" - 1 - "6" - 1 - "0" 1 - S - Speed 9600 1 - L - Interleaving 1 1 - D - Disk utility 1 - 80 DEFB #80 1 - 3. 1 - 1.4. LOAD 1 - 1.1. END MOVE 1 - ~~~~~~~~~~~~~~~~~~ 1 - F7F8 ED ??? 1 - DEC BC 1 - . LD (#F7F8),HL 1 - 6. 1 - 3- 1 - LASER SQUAD! 1 - LD HL,nn 1 - DEC HL 1 - DEC (HL) 1 - Begin where?... 1 - 1 - 1 - 1 ,v2;"Press no. of option": 1 ,u6;n;","; 1 ,buf+2048+245 1 ,buf+2048+227 1 ,1994. 3. 1 ,1994. 1 ,," KATA 1 ,," CTAH 1 ,," COPT 1 ,#D8 ;5.03 1 ,#8E ;5.01 1 ," bright(0-1)",0 1 ," paper(0-7)",0 1 ," flash(0-1)",0 1 , The CAT, 1 , TERRAIN - 1 , 1994. 1 , 1994. 1 , 1994 1 , 15-60, 1 , <ENTER> 1 , game...". 1 , MONS-3), 1 , 8:40, 1 , ********************************* 1 , (CASANOVA), 1 , (10000 => #2710), 1 , "LASER SQUAD" 1 , 49152": OUT VAL "32765",VAL "16" 1 , E - 1 , DEC SP 1 , Conditions (LOCAL) ( 1 , 3.RESCUE FROM THE MINES ( 1 , 23. GET - 1 , "5" - 1 , A - Data byts 8 1 , ~~~~~~~~~~~~~~~~ 1 , 1 +Horizontal 1 +3" (1987 1 +2" (1986 1 +*))('&%%$#""! 1 +"W\#"S\"K\6 1 *bj:ejGO:dj 1 *START TAPE 1 *START TAPE 1 *SPRITE INSERTING 1 *SPRITE DELETING 1 *FILE EXISTS 1 *ANIMATION 1 ********************************": 1 ********************************" 1 )Horizontal 1 )GMR Ltd. Garbuzov 1 )? 43. FIND - 1 )? 42. BRIN - 1 );a$(a+l,15 1 );" ";a$(a+l,11 1 ); 1 ); 1 ): MAYHEM, 1 ): LD A,#35 - 1 ): 1 ). APS - 1 ). 5. Laser Power Level - High - 1 ). AST 1 1 ). 3. NEXT UNIT - 1 ). DER, 1 ). 2. INFO - 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ). 1 ), RS-232C. 1 ) Lesnjak V.A." 1 ) Garbuzov Alex 1 ) - 1 ) "THE CAT", 1 ) 1990 Sinclair Research 1 ) Communications. 1 ) 1 (i*i+j*j): 1 (c) Garbuzov Alex MOCKBA 1992 1 (buf+2048+244), 1 (buf+2048+229), 1 (buf+2048+228), 1 (buf+2048+225), 1 (a-u,1-774) 1 (MasTer Debuger). 1 (GMT= D=X 1 (EXTEND) osnoBnoE MEnq" 1 (965 bytes) * 1 (1-12) ?",M: IN 305 LET X=D: GO SUB ROUND: LET 1 (1-12) ?",M: BE 1 (095) 490-14-26 1 ((n-a)/k)+((n-a)/k 1 ((n-a)/k)) 1 'CONVER-Utility' & Y.Kovalevsky 1 '+'P'+'Q'+'A'+Space+Enter). 1 ''" EXTEND MODE-B 1 %051.tx C 1 #E0,#D8,#D8,#00 1 #C0,#D8,#70,#00 1 #BC,#B0,#1E,#00 1 #60,#60,#60,#00 1 #0C,#0C,#0C,#00 1 #01,#19,#0F,#00 1 #00,#3F,#0C,#0C 1 #00,#0F,#18,#0F 1 #00,#00,#D8,#D8 1 #00,#00,#70,#D8 1 #00,#00,#6C,#76 1 #00,#00,#1C,#32 1 #"a\"c\"e\>82 1 "spredit2" 1 "sa pri pomowi oknA 1 "qtsa mAskA,cBEt i kolihEstBo." 1 "posrEdstBEnnym zAdAniEm rAzmE-" 1 "drivprof" 1 "RESTORES THE" 1 "NO 128K MEMORY!": 1 "NAME",Y$: 1 "NAME",U$: 1 "KAPTOTEKA 1 "INSERT DISK" 1 "HAVE BEEN" 1 "Alex MOCKBA 1992" 1 "AND PRESS 1 "? 1 ";AT 9,2; INK 4;" F: LET ANGLE=Q: GO SUB 400: LET 1 ";AT 16,5; INK 3;"@ 1 K)/180*PI): LET I=0.1858*SIN (M/ 1 ";AT 13,10;" 1 ";AT 12,10;" 280 LET W=1.2739*SIN ((2*(L-J)- 1 ";AT 11,9 5 1 ";AT Q=ANGLE 1 ": PAUSE 0: BEEP 320 RESTORE 325: READ TP,EP,W,E 1 ": PAUSE 0 290 LET V=K+W-I-S: LET A=6.2886 1 "0)030!0,0" 8 1 ". B1 OR C 1 ". 82 ADD A,D 1 ". "Sinclair-QL". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ". 1 ","*-FX128 ", 1 ", "GAMOS Ltd.", 1 ", 1 "). 1 "). 1 "(c) Garbuzov " 1 "(4!.cpopxp 1 """" """" 1 " READ ONLY !" 1 " R.S.G.C. 1 " PROTECT" 1 " PROGRAM" 1 " LINE 10, 1 " INT. 1 " DISK ERROR!" 1 " 121019, 1 " - ROCKET LAUNCHER - 1 " (SCIENTIFIC 1 " (FI- 3. 1 " (CS+6) 1 " ZX-Spectrum 1 " MAN. 1 " ink(0-7)",0 1 " B KAPTOTEKE ";n;" 1 " 7D LD A,L 1 " O SUB CONV: LET CPL=ANG 1 " HA 1 " 381 REM CPL- 1 " 390 GO SUB 9200 1 " 47.8672148,0.0090021,30.10957,1. 1 " BL 1 " ";G$;: 1 " 1 " 1 " 1 " 1 " 1 " 1 " 1 " 1 !LOAD FILE: 1 ! C371 CBB2 RES 6,D 1 ! 1 ! 1 ! 1 ! 1 ! 1 }p5p=pMpUp] eP 1 zAdEPvki pErEd ABtopoBtorom" 1 s nadpisx`: zdelal simen 1 progrAmmy: 1 obra}ajtes 1 number?..."( 1 movno ustAnoBitx B 1 ment Practice". 1 lair-QL. 1 iS-DOS? 1 iS-DOS: 1 iS-DOS. 1 iS-DOS. 1 iS-DOS, 1 dAET KombinAcia 1 centive Software 1 agnostic", 1 ZX-Spectrum... 1 ZX-Spectrum. 1 ZX-Spectrum, 1 ZX-Spectrum+128 1 ZX-Spectrum 1990 1 ZX-Spectrum 1 ZX-80. 1 ZX-48, I - Interface Centronics 1 ZX-128, ZX-48, Expansion, TR-DOS. 1 Yolkfolk. 1 Y/N). 1 Y-CTPAT","Z- 1 WARNING! 1 W5 NE1. 1 W-BOEH","G- 1 V4.1 All rights reserved 1 V 1.08!`1 1 Tomahawk, Elite, Sir Fred 1 Thanks to Rst7 for TASM 3.0 (MASM 1 TRANSMOGRIFY, 1 TR-DOS. E - Sector 256/512/1024/128 1 TR-DOS, 1 TOBOS-FP, 1 TITANIC 2 - 1 THE CATHEDRAL 1 TALK TO, USE. 1 TAKE (7) 1 TAGON-128+" 1 TAFILE). 1 T-TPEXM","X- 1 Star Inheri- 1 Star II. 1 Spectrum, 1 Slimline - 1 Sinclair 1 Scorpion' 1 SUPER B - 1 STUDIO. 1 STS (v3.2 or v3.3) or MTD 1 STRE (111) 3 CSET 1 END 1 STKBOT - 1 SPECTRUM. 1 SPECTROFON. 1 SPACE. 1 SPACE. 1 SIC 1.0, 1 SCRAPYARD 1 SAVE "OVERLANDER" CODE 4E4, 1 SAVE "M.E." 1 SAM ON OUR MIDNIGHT 1 Rock Star II). 1 Research Ltd. 1 RUN. 1 RES? (2)) MESS (20) END 1 READ ONLY ! 1 RANDOMIZE USR 53000 - 1 RANDOMIZE USR 49180, 1 RANDOMIZE USR 0, ")" (SS+9). 1 QUEST - " 1 QUAZATRON. 1 Protection ( 1 Pass 1 errors: 00 1 PUSH IY). 1 PRIN (CTR (0)) MESS (250) 1 PER 7; INK 0) 1 PC-REVIEW. ( 1 PC-REVIEW. 1 PC-REVIEW 1 PAWS (Professional Adven- 1 PANIKED ( 1 Op;@;pOpO 1 OUTI, OTIR, IND,INDR, OTDR 1 OMEGA LTD." 1 OKAY. ********************************* 1 NN+48 C9 RET ; 1 NN+46 10 F9 DJNZ LOOP ; 1 NN+45 23 INC HL ; 1 NN+44 D7 RST #10 ; 1 NN+42 C6 30 ADD A,#30 ;CHR$ - 1 NN+41 7E LOOP LD A,(HL) ; 1 NN+39 06 05 LD B,#05 ;5 1 NN+37 C9 RET 1 NN+36 21 3F C0 LD HL,CHAR ; 1 NN+34 CD E3 2D CALL #2DE3 1 NN+33 CD D9 0D CALL #0DD9 ; 1 NN+31 CD 2B 2D CALL #2D2B 1 NN+30 C1 POP BC 1 NN+30 01 CC RR LD BC,#RRCC ;RR=#18-Y, CC=#21-X 1 NN+27 CD D9 0D CALL #0DD9 1 NN+26 FD CB 02 86 RES 0,(IY+2) ; 1 NN+24 01 CC RR LD BC,#RRCC 1 NN+23 CD 00 C0 CALL H_D ; 1 NN+23 C5 PUSH BC 1 NN+20 DD 46 01 LD B,(IX+1) 1 NN+17 DD 4E 00 LD C,(IX) 1 NN+13 DD 21 E5 5B LD IX,#5BE5 1 NATIC STAS 1 NAGEMENT / TRADITIONAL, 1 N1. 1 MONS-4, 1 MONITOR. 00270 JP Z,SAVEC 1 MESS (9) EXIT END 1 MESS (19) WAIT END. 1 Ltd. MOSCOW 1 Legend Entertainment, 1 LEONARDO 1 LEAR 49999 C377 C9 RET 1 LD L,L ... 1 LD A,#05 1 LAST CRUSADE", 1 LASER SQUAD, 1 LASER SQU-. 1 LASER ON ALIEN. 1 J - 1 INVENTORY. 1 IBM. 1 IBM-PC. 1 IBM PC/AT, 1 HiSoft GEN Assembler ZX Spectrum 1 HOMEP?";N2 1 HEX/DEC. 1 HEX/DEC 1 HEAVY LASER, 1 GUARDIAN' . 1 GREMLIN GRAPHICS. 1 GOTHAM CITY PARADE. 1 GILBERT 1 GENS-4D). 1 Fate of Atlantis" 1 FLASH 1 FIELD VISION". 1 FFH; 1 FEEBLE - 1 F640 OR #40 0C INC C 1 ED5B005B LD DE,(#5B00) 23 INC HL 1 E618 AND #18 C1 POP BC 1 E607 AND #07 1 Dizzy-5 1 Dizzy-4. 1 Dizzy-4. 1 Dizzy, 1 Dizzy 6, Prince 1 Direct", 1 Datafile ("D") 1 Data- S - FILL ( 1 DROP, EXAMINE (NO1). 1 DISK ERROR! 1 DECR (1) END 1 DDE5 PUSH IX EA70 CB26 SLA (HL) 1 DDE5 PUSH IX 1 DD2A005B LD IX,(#5B00) 1 DD23 INC IX 1 DD22005B LD (#5B00),IX 1 DD19 ADD IX,DE EA6F 00 NOP 1 DATAFILE). 1 DANGEROUS. 1 D1 POP DE EA72 00 NOP 1 D1 POP DE 1 D&D (Dungeons & Dra- 1 Copyright (C) Hisoft 1987 1 Coming soon from us: MasTer Debuger 1 Chart4). 1 Centronics; 1 Cent- 1 CTR. 1 CREDITS). mov 1 CODE 27954,898. MONS' 1 CLIPPER. 1 CAPS SHIFT. 1 CALL, IM2 1 CALL nn. 1 CALL nn, 1 CADE / ADVENTURE / STRATEGY / MA- 1 C5 N_LETTER PUSH BC 1 Bill Gilbert. 1 Bill Gilbert 1 BY THE PROGRAM 1 BREAK/SPACE. 1 BREAK. 1 BOARD - 1 BLASTER, 1 BLASTER'a, 1 BIT 7,A 1 BIT 1,A (POKE 41265,79). 1 BISMARK) 1 BFFDH (49149) lity. 1 BETA-BASIC 1.0, 1 BETA-BASIC 1 BETA-BA- 15616. 1 BEGIN...END'o 1 BATMOBILE. 1 BASIC-128 1 BACKLASHE 1 B7 OR A * * * 1 Arcade-Adventure. 1 Adventure. 1 Adventure Games, 1 AY-3-8912. 1 AY-3-8912 0 - Previous menu 1 AY-3-8910, a YM-2149F. : POKE VAL "49152",VAL "30": OUT 1 AY-3-8910 : RANDOMIZE USR VAL "4e4": LOAD 1 AVAI (AVAILABLE) 1 AT y,x 1 ARCADE/ADVENTURE. 1 ARCADE/ACTION. 4. 1 ARCADE/ACTION. 1 ANDERSON - 1 AMERICAN) N11 1986 1 ALKATRAZ LOADER ( 1 AK/SPACE, 1 ADVENTURE. 1 ADR1). 1 ADD A,40H+n 1 ACTION? 1 ACADEMY. 1 ACADEMY, 1 ACADEMY, 1 ABS (Adventure Buil- 1 A. 1 A - 1 ?",K: INPUT " 1 ?",K: BEEP 1 ?",G: BEEP .1,7 1 ?",G =D: GO SUB 400: LET D=ANGLE 1 =";MOON 1 <ENTER>? 1 <ENTER>. 1 <ENTER>, 1 <ENTER> 1 9403: 1 82 ADD A,D 1 7E N_LINE1 LD A,(HL) EA62 C5 PUSH BC 1 7E LD A,(HL) EA74 0D DEC C 1 7E LD A,(HL) 5 LOAD "screen"CODE 16384 1 7B LD A,E C9 RET 1 7B LD A,E 10F8 DJNZ N_LINE2 1 79.95. 1 74 RET * * * 1 73 EI 1 72 LABEL2 LD (LINEINCHAR),A 124 NOP 1 71 XOR A 123 DEFM " " 1 70B0: 16 00 00 00 00 00 00 00 :36 1 70A8: 4A 02 4D 02 50 02 54 02 :5B 1 70A0: 14 02 36 02 3B 02 47 02 :E4 1 7098: AF 01 F2 01 00 02 04 02 :B3 1 7090: 73 01 76 01 A3 01 AA 01 :3A 1 7088: 63 01 67 01 6D 01 70 01 :A3 1 7080: 56 01 59 01 5C 01 60 01 :5F 1 7078: 3A 01 3E 01 41 01 44 01 :E9 1 7070: 18 01 27 01 34 01 37 01 :8E 1 7068: F5 00 00 01 04 01 0B 01 :DF 1 7060: E0 00 E3 00 EA 00 ED 00 :6A 1 7058: 8D 00 B0 00 B3 00 C8 00 :80 1 7050: 64 00 6D 00 7A 00 88 00 :93 1 7048: 2C 00 2F 00 4E 00 61 00 :C2 1 7040: 46 29 FF 00 26 00 29 00 :6D 1 70 LD (COUNTLET),HL 122 DEFM " 19.03.94 " 1 6F98: 16 05 1D FF 15 01 8F 15 :F8 1 6F90: 80 6D 16 05 05 FF 00 00 :0B * * * 1 6F88: 18 91 00 00 30 30 30 30 :60 1 6F80: 00 CD E0 FD 79 CD 69 FE :46 1 6F78: 3A 19 00 32 1C 00 11 18 :B1 1 6F70: 85 06 08 86 23 10 FC 4F :76 1 6F68: EA FE F1 D7 2A 22 00 7C :4F 1 6F60: 22 0E 0F 78 A1 B2 77 CD :1D 1 6F58: 0A CB 22 CB 22 CB 22 CB :63 1 6F50: 01 E6 01 0E F0 46 D1 20 :DC 1 6F48: DD 4E 01 CB 29 09 DD 7E :3B 1 6F40: 27 4F 06 00 09 22 49 00 :9F 1 6F38: DD 7E 00 CB 27 CB 27 CB :B1 1 6F30: F5 CD 7E FE F5 2A 53 00 :4F 1 6F28: 01 00 18 CF CD 6B 0D C9 :8D 1 6F20: 01 FE 10 C2 7C FF DD 36 :EE 1 6F18: 0F 18 D0 DD 34 01 DD 7E :EB 1 6F10: 01 FE FF 20 8C DD 36 01 :3D 1 6F08: 00 18 96 DD 35 01 DD 7E :93 1 6F00: 00 FE 10 20 9C DD 36 00 :4C 1 6F LD L,A 20 READ a: POKE x,a: NEXT x 1 6F LD L,A 1 6EF8: 0F 18 A6 DD 34 00 DD 7E :9F mory Editor" 1 6EF0: 00 FE FF 20 AC DD 36 00 :3A 1 6EE8: 42 18 F0 DD 35 00 DD 7E :0D 1 6EE0: 2A A8 00 01 80 00 B7 ED :45 1 6ED8: 80 00 09 22 AD 00 18 B4 :6A 1 6ED0: 38 5E 18 CD 2A B4 00 01 :98 1 6EC8: 28 51 FE 30 38 D3 FE 47 :2D ********************************* 1 6EC0: 28 39 FE 08 28 45 FE 09 :09 1 6EB8: 28 72 FE 0B 28 2D FE 0A :26 SAVE "ME"CODE 27909,846 1 6EB0: 28 22 FE 4B 28 2A FE 58 :59 1 6EA8: C5 FF FE 48 28 D1 FE 4E :65 1 6EA0: 00 CD CB FF CD C5 FE CD :02 1 6E98: 21 FC 00 21 00 00 22 F6 :5C 1 6E90: ED 43 F7 00 CD 73 FF DD :41 7050: ED B0 C9 00 00 00 00 00 :26 1 6E88: 1D 01 CD D7 FE CD 2A FF :AC 7048: 27 00 AF ED 42 EB 0E 03 :B9 1 6E80: 6B 0D 3E 02 CD 01 16 11 :9B 7040: 46 29 FF E1 E5 E5 D1 01 :9B 1 6E78: F1 C9 3E 08 32 6A 5C CD :AB 7038: 75 6D 62 65 72 28 30 2D :48 1 6E70: E2 FF 11 28 01 CD EC FE :B0 7030: 79 73 2C 68 65 78 20 6E :8B 1 6E68: 11 28 01 C3 F6 FE F5 CD :89 7028: 75 72 73 6F 72 20 6B 65 :C3 1 6E60: DD 86 01 C6 05 32 2D 01 :5D 7020: 65 58 69 74 16 01 02 63 :A6 1 6E58: 32 39 01 DD 7E 01 CB 2F :88 7018: 78 74 20 62 61 63 4B 20 :25 1 6E50: 20 D9 C9 DD 7E 00 C6 05 :A6 7010: 48 61 6E 67 65 20 4E 65 :36 1 6E48: 7B CD A5 FF 3E 0D D7 0D :D1 7008: 02 6B 65 79 73 3A 20 63 :F3 1 6E40: 86 5F 23 10 F3 3E 3A D7 :08 7000: 55 4D 16 05 00 FF 16 00 :42 1 6E38: 3E 20 D7 7E CD B2 FF 7B :52 6FF8: 20 20 36 20 20 37 20 53 :C7 1 6E30: 7C CD BD FF 7D CD B9 FF :A5 6FF0: 20 33 20 20 34 20 20 35 :9B 1 6E28: 01 0E 10 06 08 7C 85 5F :23 6FE8: 30 20 20 31 20 20 32 20 :8A 1 6E20: FF 3E 02 CD 01 16 2A 62 :3D 6FE0: 16 03 00 41 44 52 2E 20 :8D 1 6E18: CD 01 16 11 E9 01 CD 43 :75 6FD8: 6F 66 74 20 31 39 39 34 :87 1 6E10: 16 11 A5 01 CD 4D FF AF :13 6FD0: 20 65 58 54 72 61 20 53 :B6 1 6E08: C9 CD 6B 0D 3E 02 CD 01 :92 6FC8: 6F 72 20 3E 16 01 07 7F :13 1 6E00: 30 FE 3A 38 02 C6 07 D7 :B4 6FC0: 6F 72 79 20 45 64 69 74 :2F 1 6DF8: 2F CD 02 00 F1 E6 0F C6 :0F 6FB8: 16 00 07 3C 20 4D 65 6D :BF 1 6DF0: F5 CB 2F CB 2F CB 2F CB :0B 6FB0: 44 44 52 45 53 53 3A FF :1D 1 6DE8: 18 D4 05 04 20 D0 18 A2 :F4 6FA8: 03 49 4E 50 55 54 20 41 :0B 1 6DE0: 2B 11 BF 01 CD 7D FF 04 :96 6FA0: 00 FF 08 20 08 FF 16 0A :5D 1 69 ADD HL,BC 121 DEFM " magazine " 1 68 LD HL,(COUNTLET) 120 DEFM " ZX-REVIEW " 1 67 LD BC,16 119 DEFM " Special for " 1 67 LD H,A 10BE DJNZ N_LETTER 1 66 JR NZ,LABEL2 118 DEFM "----------------" 1 65 CP 08 117 TEXT DEFM "( 1 64 - "@". 1 64 INC A 116 BUFFER DEFS 32 1 6313"), 1 63 LD A,(LINEINCHAR) 115 LINEINCHAR DEFB 0 1 62 LDIR 114 COUNTLET DEFW XXXX 1 61 LD BC,32 113 STARTLET DEFW XXXX 1 60 LD HL,BUFFER 1 6. 1 5D LD E,L 50 PAUSE 0: RANDOMIZE USR 60000 1 59 LD DE,#55E0 112 RET 1 59 LD E,C Crazy CLS. 1 58 LDIR 111 JR NZ,L4 1 57 LD BC,32 110 L3 DEC C 1 56 LD HL,BUFFER 109 LD H,A 1 55 LD DE,#56E0 108 SUB 08 1 54 DJNZ LOOP3 107 LD A,H 1 54 LD D,H 62,63,188,32,234,193,16,227,201 1 53 INC HL 106 JR C,L3 1 52 POP BC 105 LD L,A 1 51 JR NZ,LOOP2 104 ADD A,32 1 50). 1 50 DEC C 103 LD A,L 1 4E14 C9 7830 RET 1 4E12 38CB 7820 JR C,HEADER ; 1 4E10 FE21 7810 CP #21 ; 1 4E0D 3A4E51 7800 LD A,(L[9]) ; 1 4E0A CDB349 7790 CALL BOARD ; 1 4E09 D1 7780 POP DE ; 1 4E06 21010F 7770 LD HL,#0F01 ; 1 4E05 41 7760 L57 LD B,C ; 1 4E03 0E0A 7750 LD C,#0A ; 1 4E01 2001 7740 JR NZ,L57 ; 1 4DFF 0E08 7730 LD C,#08 ; 1 4DFB DDCB0056 7720 BIT 2,(IX) ; 1 4DF7 DDCB00C6 7710 SET 0,(IX) ; 1 4DF4 CD8249 7700 CALL SOUND ; 1 4DF1 CD3C20 7690 CALL #203C 1 4DEE 011D00 7680 LD BC,L[F]-L[E] ; 1 4DEB 11BD51 7670 LD DE,L[E] ; 1 4DE8 CDA84D 7660 CALL CLEAR ; 1 4DE6 3620 7650 LD (HL),#20 ; 1 4DE5 E5 7640 PUSH HL ; 1 4DE2 011000 7630 LD BC,#0010 ; 1 4DDF 214E51 7620 HEADER LD HL,L[9] ; 1 4DAB EDBO 7420 LDIR ; 1 4DAA 13 7410 INC DE ; 1 4DA9 D1 7400 POP DE ;DE ( 1 4DA8 E5 7390 CLEAR PUSH HL ; 1 4A4A C9 2880 RET ; 1 4A49 D7 2870 RST #10 ; 1 4A48 1A 2860 LD A,(DE) ; 1 4A47 D7 2850 RST #10 ; 1 4A46 AF 2840 XOR A ; 1 4A45 D7 2830 RST #10 ; 1 4A43 3E12 2820 L8 LD A,#12 ; 1 4A42 C9 2810 RET ; 1 4A41 D7 2800 RST #10 ; 1 4A40 F1 2790 POP AF ; 1 4A3F D7 2780 RST #10 ; 1 4A3D 3E01 2770 LD A,#01 ; 1 4A3C D7 2760 RST #10 ; 1 4A3A 3E12 2750 LD A,#12 ; 1 4A39 F5 2740 PUSH AF ; 1 4A37 200A 2730 JR NZ,L8 ; 1 4A35 FE2A 2720 CP #2A ; 1 4A34 F1 2710 POP AF ; 1 4A33 D7 2700 RST #10 ; 1 4A32 AF 2690 XOR A ; 1 4A31 D7 2680 RST #10 ; 1 4A2F 3E10 2670 LD A,#10 ; 1 4A2E D7 2660 RST #10 ; 1 4A2D 7C 2650 LD A,H ; 1 4A2C D7 2640 RST #10 ; 1 4A2B 7D 2630 LD A,L ; 1 4A2A D7 2620 RST #10 ; 1 4A28 3E16 2610 LD A,#16 ; 1 4A27 F5 2600 CURSOR PUSH AF ; 1 4A25 F3 2580 DI ; 1 4A23 28FA 2570 JR Z,L5 ; 1 4A1F FDCB016E 2560 L5 BIT 5,(IY+1) ; 1 4A1B FDCB01AE 2550 RES 5,(IY+1) ; 1 4A1A FB 2540 PRESS EI ; 1 4A18 1899 2530 JR BOARD ; 1 4A17 41 2520 LD B,C ; 1 4A14 CD8249 2510 CALL SOUND ; 1 4A12 10F6 2500 DJNZ L11 ; 1 4A11 25 2490 DEC H ; 1 4A0F F1 2470 POP AF ; 1 4A0C CD274A 2460 CALL CURSOR ; 1 4A0B F5 2450 PUSH AF ; 1 4A0A 12 2440 L11 LD (DE),A ; 1 4A08 3E20 2430 LD A,#20 ; 1 4A07 47 2420 LD B,A ; 1 4A06 CO 2410 RET NZ ; 1 4A02 DDCB0046 2400 BIT 0,(IX) ; 1 4A00 28B1 2390 JR Z,BOARD ; 1 49FF 90 2380 SUB B ; 1 49FE 79 2370 LD A,C ; 1 49FD C1 2360 ENT POP BC ; 1 49FB 18B6 2350 JR BOARD ; 1 49FA 04 2340 INC B ; 1 49F9 25 2330 DEC H ; 1 49F8 1B 2320 DEC DE ; 1 49F5 CD8249 2310 CALL SOUND ; 1 49F2 CD274A 2300 CALL CURSOR ; 1 49F1 12 2290 LD (DE),A ; 1 49EF 3E20 2280 LD A,#20 ; 1 49ED 28C4 2270 JR Z,BOARD ; 1 49EC 90 2260 SUB B ; 1 49EB 79 2250 LD A,C ; 1 49EA C1 2240 DEL POP BC ; 1 49E9 C9 2230 RET ; 1 49E6 C1 2210 POP BC ; 1 49E5 24 2200 INC H ; 1 49E4 13 2190 INC DE ; 1 49E1 CD8249 2180 CALL SOUND ; 1 49DE CD274A 2170 CALL CURSOR ; 1 49DD 12 2160 LD (DE),A ; 1 49DB 38D7 2150 JB C,L6 ; 1 49D9 FE20 2140 L7 CP #20 ; 1 49D7 38DB 2130 JR C,L6 ; 1 49D5 FE30 2120 CP #30 ; 1 49D3 30DF 2110 JR NC,L6 ; 1 49D1 FE3A 2100 CP #3A ; 1 49C9 2832 2070 JR Z,ENT ; 1 49C5 2823 2050 JK Z,DEL ; 1 49C3 FE08 2040 CP #08 ; 1 49BF FE80 2020 CP #80 ; 1 49BC #A085C 2010 LD A, (#5C08); 1 49B6 CD274A 1990 CALL CURSOR ; 1 49B4 3E2A 1980 L6 LD A,#2A ; 1 49B3 C5 1970 BOARD PUSH BC ; 1 49AF 329A49 1950 LD (TO+1),A ; 1 49AE 2F 1940 CPL ; 1 49AD F1 1930 POP AF ; 1 49AB 10FE 1920 L10 DJNZ L10 ; 1 49A9 D3FE 1910 OUT (#FE),A ; 1 49A8 B1 1900 OR C ; 1 49A7 OF 1890 RRCA ; 1 49A6 OF 1880 RRCA ; 1 49A5 OF 1870 RRCA ; 1 49A3 E638 1860 AND #38 ; 1 49A0 3AFF5A 1850 LD A,(#5AFF) ; 1 499F 4F 1840 LD C,A ; 1 499D E610 1830 AND #10 ; 1 499C 2F 1820 CPL ; 1 499B F5 1810 PUSH AF ; 1 4999 3E00 1800 TO LD A,#00 ; 1 4998 47 1790 TONE LD B,A ; 1 4997 C9 1780 RET ; 1 4996 D9 1770 EXX ; 1 4994 20F3 1760 JR NZ,L9 ; 1 4993 B5 1750 OR L ; 1 4991 2D 1730 DEC HL ; 1 498E CD9849 1720 CALL TONE ; 1 498D 7A 1710 LD, A,D ; 1 4986 111616 1680 LD DE,#1616 ; 1 4983 218000 1670 LD HL,#0080 ; 1 4982 D9 1660 SOUND EXX ; 1 49 POP BC 102 JR NZ,L3 1 4800 60 ORG #4800 1 48 INC IX 101 AND 07 1 47 DJNZ LOOP1 100 LD A,H 1 47 LD B,A 1 46 RL (IX+0) 99 L2 INC H 1 45 POP AF 98 LD D,A 1 44 RL (IX+0) 97 SUB 08 1 43 PUSH AF 96 LD A,D 1 42 LOOP1 RLA 95 JR C,L2 1 41 LOOP2 PUSH BC 94 LD E,A 1 40. 00410 WHOD SBC HL,DE 1 40 LD BC,#0402 93 ADD A,32 1 4. 1 3A025B LD A,(#5B02) 1 39 POP HL 92 LD A,E 1 38 LD A,(HL) 91 JR NZ,L2 1 37 ADD HL,BC 90 AND 07 1 36 LD BC,(#5C36) 89 LD A,D 1 35 ADD HL,BC 88 INC D 1 34 LD B,0 87 POP HL 1 33 (#21), 1 33 LD C,A 86 POP DE 1 32 LD A,(LINEINCHAR) 85 DJNZ L1 1 31 ADD HL,HL 84 INC DE 1 300000. 1 30 ADD HL,HL 83 INC HL 1 30 1 3. BOOK 3. Large book 1 3. 1 2B DEC HL 1 2A365C LD HL,(#5C36) 1 29 ADD HL,HL 82 LD (HL),A 1 29 ADD HL,HL ,167,0,203,38,0,203,6,0 1 29 ADD HL,HL 40 DATA 203,38,0,43,13,32,242, 1 29 ADD HL,HL 30 DATA 6,6,197,33,255,87,14,32 1 28000 6D43 23 INC HL 1 28 LD H,0 81 L1 LD A,(DE) 1 27 LD L,(HL) 80 LD B,32 1 2600, 2620 1 2600 LD H,#00 10 FOR x=60000 TO 60031 1 26 PUSH HL 79 PUSH DE 1 2570...2680 1 255,62,58,237,71,237,94,251,201 1 255). 1 25 LOOP3 PUSH BC 78 L4 PUSH HL 1 249, 250 1 24 (#18). 1 24 LABEL1 LD B,16 ;LD C,190. 1 23296: 1 23 LD (COUNTLET),HL ;LD DE,#4200 1 23 INC HL EA6A CB26 SLA (HL) 1 22005B LD (#5B00),HL 1 22.15. 1 22 LD HL,(STARTLET) ; 1 22 * * * 1 21025B LD HL,#5B02 ~~~~~~~~~ 1 21 JR NZ,LABEL1 ; 1 20. 1 20 CP 0 77 LD C,191; 1 2. BOTTLE 2. Green bottle 1 2. 1 2. 1 1F RRA 1 1F RRA 1 1993 ShiSoft": 1 1991 KORDIAL"; 1 19 LD A,(HL) 76 LD DE,#4100; 1 19 ADD HL,DE 1 CLEAR 59999 1 19 ADD HL,DE 1 18 LD IX,BUFFER 75 SCROLL LD HL,#4000 1 1600 LD D,#00 1 14 INC D EA7A 20EA JR NZ,#EA66 1 14 INC D EA77 3E3F LD A,#3F 1 14 INC D EA69 00 NOP 1 14 INC D EA66 0E20 LD C,#20 1 13.07 " 1 12 LD (DE),A EA79 BC CP H 1 12 LD (DE),A EA75 20F2 JR NZ,#EA69 1 12 LD (DE),A EA68 A7 AND A 1 12 LD (DE),A EA63 21FF57 LD HL,#57FF 1 112000 LD DE,#0020 EA6D CB06 RLC (HL) 1 10F8 DJNZ N_LINE1 EA6C 00 NOP 1 101, 78, 68 1 1. KEY 1. Small key 1 1. 1 0E01 LD C,#01 1 0604 N_LINE2 LD B,#04 EA73 2B DEC HL 1 0604 LD B,#04 EA60 0606 LD B,#06 1 0.0.1980 1 0. 00390 LD HL,(#FD02) 1 0. 1 -MY DYING BRIDE- THE BEST D 1 - ZX-Spectrum+ 1 - ZX-81. 1 - USE ASPIRIN. 1 - Sinc- 1 - KBECT ( 1 - ATARI, COMMODO- 1 - 24575 (#5FFF)). 1 - "DEAD CITY" 1 - "+" (SS+K). 1 - Stalingrad, Overlord, Rebel 1 ,244,255,34,245,255,62,24,50,255, 1 ********************************* 98011,49.4032001,9.36,4.539E-6 1 ********************************* ~~~~~~ 1 ********************************* 2. 1 ********************************* 1 ********************************* 1 * Edit Verbs *. 1 (WEIG(N)) 1 (Sim City 1 (SCORE). 1 (SCORE), 1 (Runable ad- F - FILL 1 (RPG); 1 (NO1) OKAY END. 1 (NEMANSOFT), 1994. 1 (NELSON). 1 (MASK), 1 (Joe Blade 2, 1 (JACKRABBIT), 1 (IX). 1 (INK) 1 (INFO), 1 (GO SUB). 1 (FLASH) 1 (ENERGY) 1 (DROP). 1 (C) Konami 1986, (C) Imagine 1987 1 (BORDER 0; FLASH 0; BRIGHT 0; PA- 1 (BLASTER), 1 (BACKLASH), 1 (ARMOURY). 1 (ACTION POINTS) 1 (1947). 1 (150000). 1 (1000 => 1 (100 => #0064), 1 (10 => 000 1 (..) OBJ. 1 ('). 1 (#6D60). 1 ("R"). 1 #ED, #8A 1 #7043...#7052, 1 #6D60). 1 #6D2C). 1 #05, #0A 1 #0312). 1 #...is". 1 "tlw2ms". 1 "eND". 1 "diz4.M" 1 "diz4.M" 1 "ZX-Spec- 1 "ZX-SPECTRUM". 1 "YOUR SINCLAIR"). 1 "Y". 1 "Which room 1 "Unterseebot" 1 "The Great Escape" 1 "The FFH 1 "Start in 1 "Sinclair 1 "Shaye Communications" 1 "Scorpion ZS 256". 1 "SYMBOL/SH", 1 "SPACE" - 1 "SOUND" 1 "SIMETRON LTD" 1 "SEGA", "NINTENDO" 1 "SABOTEURS" - 1 "S" 1 "Rick Dangerous". 1 "Red Cross Parcel"). 1 "RANSOM" ( 1 "Quest for Mindstone". 1 "PLANETS" 1 "PC-REVIEW" 1 "PAPER" 1 "OVERLANDER". 1 "OMNI CORP" 1 "Noun". 1 "NOT IN 1 "Memory Edi- 1 "MONS"). 1 "MAGIC". 1 "MADNESS", "TCHIRNHAUSEN", 1 "Lives: 5", 1 "LUNA", "MEDOX" 1 "KODEK". 1 "Joystick club". ROBOCOP. 1 "JUNGLE WARRIOR": . RET 1 "Item Discove- 1 "End of fi- 1 "Disk-Doctor" 1 "DIZZY-4" 1 "DISK" 1 "DEAD CITY" - 1 "Crazy CLS". 1 "Comtek-94" 1 "Cambridge Computer Limited". 1 "CHAOS", "OBOI" 1 "Break"). 1 "BORDER" 1 "BORDER" 1 "BETA-BASIC 1.0". 1 "BATMOBILE". 1 "Anamar- 1 "Adventure Games: 1 "AXIS CHEMICAL PLANT". BATMOBILE - 1 "AT" 1 "ASSASINS", 1 "9", 1 "11-th Hour" 1 "1". 1 "0" 1 "-" (SS+J). 1 "*" (SS+B). 1 "$&(+-/2479<?ADGJMORUX[^adgjmptwz} 1 "#" (SS+3), 1 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1 round: LET VS=X 1 proizBoditsa oknom": 1 pri BXodE B MEnq BybirAqtsa" 1 pErEmEwEniE linzy" 1 hotq tut lu^ 1 ZX-Spectrum 1982 1 ZX-Spectrum 1 XR=X: PRINT XR;" 1 V-2*PLRV*RV*COS ((PLLP-LP)*GR)) 900 GO TO 115 1 UND: LET BSAN=X 1190 IF A$="y" OR A$="Y" THEN G 1 TR-DOS. 1 THIS PROGRAM 1 THEN RETURN 1 TAKE (7) 1 T VS=((15-SK)*40)+7 1 T U=3 150 DATA " 1 T U$="Chart3" 9910 RANDOMIZE USR 15619: REM : 1 T SN=1 1 T SKR=X " 1 T MST=X 1060 LET R=D-D(1): GO TO 1100 1 T ASAN=ANG 1160 DATA " 1 T ANG=NSAN: GO SUB CONV: LET NSA 6): LET U=INT (G*365.25): LET D= 1 T ; FLASH 1; FLASH 1; BRIGHT 1; 1 T 254,85 1 Speedlock RET PE - 1 Slainking, 1 Scorpion'a 1 SET 0,(IX) 1 SCORE + 20 CSET 0 MESS (10) SET (2) END 1 SAVE "MOON" LINE 10 1 S ((SKE-SDELTA)*GR)*COS (VK*GR)* 1510 IF ANG>=0 AND ANG<=360 THEN 1 Runable adventure C - 1 RUN 9900 1 RNHAUSEN" 1 RN 1 RANDOMIZE USR 1 RAMTOP ( 1 RAMTOP ( 1 POKE 23570,16 1 PC-REVIEW, 1 PC-REVIEW 1 OT I,1: PLOT I,174: NEXT I 1 OT 3,J: PLOT 2,J: PLOT 252,J: PL 1 OT 253,J: NEXT J: PLOT 1,85: PLO 1 OS (V*GR)): RETURN DS-LP)*GR))))/GR: RETURN 1 Nicolas Rodionov. 1 NOV=0 1 NORTH (3) 1 NN+6 RES 0,(IX) ; 1 NN+3 LD DE,ADDR ; 1 NN+13 CALL BOARD ; 1 NN+12 LD B,C ; 1 NN+10 LD C,#05 ; 1 NN+0 LD HL,XXYY ;XX 1 NDOMIZE USR 50000 THEN LET NK=2 1 N=ANG C+U+K-114: RETURN 1 N (Y/X)+ACS SGN Y)/GR: RETURN 6000 RETURN 1 N (MSAN*GR) 1130 DATA " 1 Memory 1 MONS-CENS. 1 LS LS 1 LOAD "chr"CODE 64600 306 DATA 84.01247,228.0708551,1 1 LOAD "Chart"CODE 50000 90 LET M=M+12: LET G=G-1 1 LIGHT (27) 1 LEVEL 9, 1 LET ELONG=X TO 1510 1 LEAR 64599 .6653974,0.0556155,9.554747,2.48 1 LEAR 49999: RANDOMIZE USR 15619: =ANGLE 1 LEAR 49999 70 LET R=D-D(1): GO TO 110 1 LD (nn),A - 1 LAMP (13) 1 L*SQR FAZ)))/LN 10)-27.6 1050 PRINT AT 3,21; INK 6;K;"." 1 INT ; FLASH 1; BRIGHT 1; INK 2;" 1 INI, INIR, 1 IBM - 1 GR))/2: LET X=FAZ: GO SUB ROUND: 1030 INPUT " 1 ET X=SDELTA: GO SUB ROUND: LET S XT J: PRINT AT 4,21; INK NK;D$ 1 ET VS=(120+(24-SK)*40)+7 1 ET VS=((21-SK)*40)+7 1 ET U=4 175 RESTORE 120 1 ET U=1 C+U+K-114: RETURN 1 ET U$="Chart4" 1 ET U$="Chart1" 9505 LET Y=SGN X: LET Z=ABS X*RD 1 ET SN=-1 1 ET NOV=0 1 ET MOON=X 1 ET FAZ=PR 1 ET FAZ=-PR 1 ERR-SP ( 1 ERASE "MOON" 1 ENTER. 1 ELITE. ********************************* 1 EAT (30) APPLE 1 DIZZY. 1 DELTA=X 1180 POKE 23658,8: INPUT AT 0,4; 1 DELETE, 1 DEC/HEX, 1 CS (SIN (VK*GR)*SIN (BSAN*GR)+CO 0-360 1 COS (BSAN*GR)))/GR RETURN 1 CARRY, 1 CAPS SHIFT 1 BOARD ( 1 BILL RET PO - 1 BETA-BASIC 1 ACADEMY. 1 =ANG: LET SM=NP+EP-W B CONV: LET CPL=ANG 1 =ANG 1115 RESTORE 1120 1 <ENTER>, 1 <EN- 1 ;M;".";G;AT 4,21;;H;" 1 ;0,50,SN*PI 1 : LET LP=ANG: LET V=LP-W 9210 LET UPL=(ATN (ERV*TAN (PLJ* 1 : GO SUB ROUND: LET DIAM=X 1010 DIM D(31) 1 993 ASTRO-SOFTWARE" 180*PI): LET S=0.37*SIN (M/180*P 1 9910 RANDOMIZE USR 15619: REM : 1 9900 RANDOMIZE USR 15619: REM : 1 979: GO SUB 80: LET D(1)=D )/180*PI)): LET D=Y-J: LET ANGLE 1 9510 LET X=INT Z/(10*10)*Y: RETU 1 9505 LET Y=SGN X: LET Z=ABS X*10 1 9500 REM ROUND 1 619: REM : LOAD U$ CODE 16384 1 60: LET X=XR: GO SUB ROUND: LET 570 PRINT AT 19,1;" 1 60: GO TO 400 1 5990 INPUT "": PRINT #0; INK 4;A - 1 579,48.0941733,6.74,1.918E-6 420 PRINT INT ABS VK;" 1 51 7729895,73.8768642,65.8,7.768E-5 1 51 K=ANGLE 1 5080 PLOT VS,VV: CIRCLE VS,VV,2 127), 1 5070 LET X=VV: GO SUB ROUND: LET " 1 5060 LET RD=1: LET X=VS: GO SUB 1 5050 FOR J=19 TO 151 STEP 33: PL 1 5040 FOR I=47 TO 207 STEP 40: PL 1 5030 PLOT 4,2: DRAW G2,0: DRAW 0 1 5020 PLOT 0,0: DRAW G1,0: DRAW 0 1 5010 LET G1=255: LET G2=247: LET 1 5000 BORDER 0: POKE 50001,U: RA 180 LET NK=7: IF DAY=1 OR DAY=7 1 5000 BORDER 0: RANDOMIZE USR 15 1 4: LET ANG=ASAN: GO SUB CONV: LE 1150 DATA " 1 4655 LET VV=85+VK*3.15 1 4650 IF VK=0 THEN LET VV=85 1 4645 IF SK>=15 AND SK<21 THEN L 1 4640 IF SK>=9 AND SK<15 THEN LE 1 4635 IF SK>=3 AND SK<9 THEN LET 1 4630 IF SK>=0 AND SK<3 THEN LET 1 4625 IF SK>=21 AND SK<24 THEN L 1 4620 IF SK>=15 AND SK<21 THEN L SAVE "PLANETS" LINE 10 1 4620 IF SK>=15 AND SK<21 THEN L 160 DATA " 1 4615 IF SK>=9 AND SK<15 THEN LE ERASE "PLANETS" 1 4615 IF SK>=9 AND SK<15 THEN LE 140 DATA " 1 4610 IF SK>=3 AND SK<9 THEN LET RN 1 4610 IF SK>=3 AND SK<9 THEN LET 120 DATA " 1 4605 IF SK>=0 AND SK<3 THEN LET *RD+0.5 1 4605 IF SK>=0 AND SK<3 THEN LET 110 LET C=INT (D/7): LET DAY=1+ 1 4600...4620 190 POKE 23658,8: INPUT AT 0,4; 1 4600 IF SK>=21 AND SK<24 THEN L 9500 REM ROUND 1 4600 IF SK>=21 AND SK<24 THEN L 6): LET U=INT (G*365.25): LET D= 1 4515 LET RV=AE*(1-EC*EC)/(1+EC*C GR)*SIN ((CPL-DS)*GR)/(RV*SIN (( 1 4510 LET LP=NP+360*EC*SIN (SM*GR 9020 GO SUB 9200: GO TO 400 1 4505 LET NP=360*R/(365.2422*TP): (RV*SIN (MJ*GR)/(ERV-RV*COS (MJ* 1 4500 REM INORBIT- 1 42128,0.2056306,0.3870986,7.0043 SGN VK=-1 THEN PRINT "-"; 1 32768!!! ( 1 3030 PAUSE 0: GO TO 30 1 3020 PRINT INK 3;" 1 3010 DRAW INK NOV;0,-50,FAZ*PI 1 3000 PLOT 225,10: DRAW INK NOV 1 30 act.points, 1 3 ASTRO-SOFTWARE" : LET PLRV=RV: LET PLAE=AE 1 2990 IF D>=0 AND D<15 THEN LET 1 2980 IF D>345 AND D<=360 THEN L 1 2970 LET NOV=7 1 2570-2680; 1 2010 LET Z=(ATN (Y/X)+ACS SGN AT DER 1 1 2000 REM ATN- 1 1990 MOA B-Disk version. 1 1987-1989 1 1980-1986 1 140 RANDOMIZE USR 50000 1 130 INK 7: CLS : PAUSE 0 1 120 RANDOMIZE USR 50040 1 110 DATA 176,201 1 1060 IF D>180 AND D<=360 THEN L 1 1050 IF D>=0 AND D<=180 THEN L 1 1040 LET PR=2*MOON-1 1 1030 IF D>180 AND D<=360 THEN L 1 1020 IF D>=0 AND D<=180 THEN LE 1 100 DATA 199,33,0,64,1,0,24,237 1 02210 JR NZ,L8 9 - 1 02200 CP 78 6 - 1 02190 LD A,(HL) 5 - 1 02180 RET NZ 1 02170 CPIR 3 - 1 02160 L8 LD A,101 1 02150 POP HL 1 02140 POP BC 1 02130 PUSH HL 1 02120 SBC HL,BC 1 02110 LD HL,57340 02680 RET 1 02100 PUSH HL 02670 P1 CALL #F95A 1 02090 POP BC 02660 XOR A 1 02080 DLINA PUSH HL 02650 JR Z,P1 1 02070 JP CODE 02640 CP 40 1 02060 CALL #F276 02630 POP AF 1 02050 CALL #F503 02620 CALL #F95A 1 02040 LD A, 13 02610 CALL A,108 1 02030 EXIT POP HL 02600 CALL #F95A 1 02020 RET 02590 LD A,27 1 02010 XOR A 02580 PUSH AF 1 02000 RET Z 02570 P0 SUB 79 1 01990 LER CP 7 02560 JP END 1 01980 RET C 02550 CALL #F503 1 01970 CP 71 02540 LD A,15 1 01960 JR C,LER 02530 JR C,LP6 1 01950 CP 65 02520 CP 13 1 01940 RET C 02510 LP6 CALL #F652 1 01930 CP 58 02500 CALL #1601 1 01920 JR C,LER 02490 LD A,3 1 01910 SRAW CP 48 02480 LP5 CALL 15635 1 01900 RET 02470 LD C,7 1 01890 SUB 7 02460 LD A,2 1 01880 RET C 02450 CALL 15635 1 01870 CP 10 02440 CAT LD C,24 1 01860 LA SUB 48 02430 JR LP5 1 01850 RET 02420 LD (#5D19),A 1 01840 OR D 02410 DA LD C,1 1 01830 CALL LA 02400 JP #F1B3 1 01820 LD A,E 02390 JR Z,DA 1 01810 CALL #F503 02380 CP 1 1 01800 LD E,A 02370 JR Z,DA 1 01790 JR Z,EXIT 02360 AND A 1 01780 AND A 02350 SUB 65 1 01770 CALL SRAW 02340 CALL #F652 1 01760 RET C 02330 DEFB 0 1 01750 CP 8 02320 DEFM /A or B/ 1 01740 CALL #F652 02310 DISK CALL #E4E3 1 01730 LD D,A 02300 RET 1 01720 RLCA 02290 DEC HL 1 01710 RLCA 02280 L9 DEC HL 1 01700 RLCA 02270 JR L8 1 01690 RLCA 02260 DEC HL 1 01680 CALL LA 02250 JR Z,L9 1 01670 LD A,D 02240 CP 68 1 01650 LD D,A 02220 INC HL 1 01080 DEFM /Error / 01640 JR Z,EXIT 1 01070 DEFB 13 01630 AND A 1 01060 ERR CALL #E4E3 01620 CALL SRAW 1 01050 RET 01610 RET C 1 01040 LD A,(23823) 01600 CP 8 1 01030 CALL 15635 01590 NUM CALL #F652 1 01020 FNAME LD C,10 01580 JR WHOD 1 01010 RET 01570 JR NZ,ERR 1 01000 POP HL 01560 POP HL 1 00990 JR NZ,LP2 01550 POP DE 1 00980 CP 255 01540 CP 255 1 00970 CALL FNAME 01530 CALL FNAME 1 00960 PUSH HL 01520 LD (BUF),A 1 00950 INC (HL) 01510 LD A,54 1 00940 LP2 POP HL 01500 PUSH DE 1 00930 LD (HL),A 01490 PUSH HL 1 00920 LD A,47 01480 JR NZ,ERR 1 00910 PUSH HL 01470 LD (BUF),A 1 00900 INC HL 01460 LD A,53 1 00890 LD (HL),A 01450 CALL DLINA 1 00880 LD A,90 01440 POP DE 1 00870 RET NZ 01430 PUSH HL 1 00860 CP 32 01420 JR NZ,CODE 1 00850 LD A,(HL) 01410 CALL NZ,#F252 1 00840 LP LD HL,23773 01400 CALL #F503 1 00830 RET 01390 LD A,13 1 00820 DJNZ LP1 01380 CP 13 1 00810 LP3 CALL #F503 01370 CALL #F652 1 00800 INC DE 01360 LD L,A 1 00790 AGA LD (DE),A 01350 LEND2 JP C,END 1 00780 JR LP3 01340 CALL NUM 1 00770 INC B 01330 JP NC,ERR 1 00760 INC B 01320 LD (BUF),A 1 00750 LD A,12 01310 LD A,51 1 00740 LD (DE),A 01300 CP #E0 1 00730 LD A,32 01290 LD H,A 1 00720 JR C,NAME 01280 JR C,LEND2 1 00710 CP #DD 01270 CALL NUM 1 00700 LD A,E 01260 DEFB 0 1 00690 LP4 DEC DE 01250 DFEM / Code:/ 1 00680 JR NC,AGA 01240 CODE CALL #E4E3 1 00670 JR Z,LP 01230 JP C,END 1 00660 CP 13 01220 SAVEC CALL NAME 1 00650 RET C 01210 RET 1 00640 CP 8 01200 POP DE 1 00630 LP1 CALL #F652 01190 LD (HL),67 1 00620 DEFB 0 01180 LDIR 1 00610 DEFM /Name:/ 01170 LD BC,8 1 00600 CALL #E4E3 01160 LD (HL),32 1 00590 LD B,8 01150 INC DE 1 00580 NAME CALL FILL 01140 POP DE 1 00570 LEND JR LEND1 01130 PUSH HL 1 00560 LD C,14 01120 PUSH HL 1 00550 LD (23801),A 01110 FILL LD HL,23773 1 00530 JR Z,ERR 01090 BUF DEFB 0,13,0 1 00060 CP 86 1 00050 JP Z,DISK 1 00040 CP 68 1 00030 CALL Z,#F880 1 00020 CP 80 1 00010 ORG #F1F4 1 0 LET NK=SIN (23.441884*GR): LET Q 1 /2: 1 / * - + & ', 1 .7*COS (3.01*t/180*PI) 1 .1*SIN (15.03*t/180*PI) 1 -";A$ R)/(RV-ERV*COS (MS*GR))))/GR: LE 1 - CARR. 1 - USE KEY ON DOOR. - 1 - USE - 1 - Sinclair 1 - 1 ,V2: DRAW -G2,0: DRAW 0,-V2 " 1 ,V1: DRAW -G1,0: DRAW 0,-V1 1 *GR)))/GR: LET X=BSAN: GO SUB RO : BEEP .1,7 1 *60: LET X=SKR: GO SUB ROUND: LE 21,1; BRIGHT 1; FLASH 1; INK 2; 1 *10+0.5 1 )/PI+EP: LET ANG=LP: GO SUB CONV 9200 REM 1 (west), 1 (ZX-COMPILER, MCODER-2 1 (PRINCE 1 (National En- 1 (HEALER), 1 (DISK, 1 (Chart1 - 1 ("diz4.M") 1 ("Black Watch"), 1 #6D30 (27952) 1 #6D2C...#6D2E - 1 #60-#7F ( 1 "SINCLAIR" 1 "SABOTE- 1 "Room 1 "PLANETS" 1 "MEGA-BASIC", 1 "M.E.", 6D37 23 INC HL 1 "Instru- 1 "Indiana Jones and the 1 "Indiana Jones and the 1 "INDIANA JONES AND 1 "IBM-PC 1 "GENS-4D", "MONITOR-48K" 1 "End of file". 1 "Dizzy Downs The Ra- 1 "Black Watch". 1 "BATMAN". 1 "BATMAN", 1 "Adventure", 1 "7-th Guest" 1 "4" - 1 v3.0 (by 1 tes of Assenot", 1 sarts - 1 red"), 1 pids" 1 much to pick that up". 1 lair Radionics. 1 hics). 1 a weight?" ( 1 ZX-Spectrum 1 ZX-SPECTRUM-48K". 1 VV=X 1 VS=((9-SK)*40)+7 1 VS=((3-SK)*40)+7 1 V1=175: LET V2=171 1 U=2 130 DATA " 1 U=1 D-C*7 1 U-96 [4], 1 U$="Chart2" 9900 RANDOMIZE USR 15619: REM : 1 U$="Chart1" 9510 LET X=INT Z/(RD*RD)*Y: RETU 1 Tales, 1 TURE/D&D. 1 TR-DOS; 1 TAPE LOADER, 1 RANDOMIZE USR 1 RAM, 1 PRIN (TURN) MESS (255) WAIT END 7. IF (VERB (27) AND NOUN (13) 1 PENETRA- 1 NOUN OBSECT 1 NORTH". 1 MAT & SHISOFT ( 1 LOAD 1 LET FAZ=X 1040 INPUT " 1 LET ANG=NP: GO SUB CONV: LET NP GR))))/GR+DS: LET ANG=CPL: GO SU 1 LECT: 1 LASER SQUADa 1 KE 46049,0 - 1 IY,XXXX 1 ITEMS. " 1 I: PRINT AT 4,1; INK 3;A$ K+COS (UPL*GR)*NK*QK))/GR 1 HEX/DEC, 1 HEX/DEC 1 HEADER ( 1 Fate of Atlantis" ( 1 F3 DI 1 Editor. 1 ENTER, 1 DIZZY V FOR 48K". 1 DIAGNOSTIC). 1 DESCRIPTION, 1 CRACK THE JOKER'S CODE. 1 BEGIN.....END 1 BATMOBILE 1 BA CP D 23298 - 1 B9 CP C (23296). 1 ANG=MSAN: GO SUB CONV: LET MSAN D-C*7 1 ADVENTURE? 1 ADVENTURE 1 <ENTER> 1 <ENTER> 1 90 DATA 231,16,223,201,17,56 1 83 1 80 DATA 235,18,241,8,203,178,24 1 7E NEXT_A LD A,(HL) 1 7C LD A,H 23297 - 1 70 DATA 23,23,245,166,235,182 * * * 1 6DD8: D7 18 E3 78 FE 04 28 DE :97 1 6DD0: ED 05 04 28 E9 77 23 05 :E3 1 6DC0: FF FE 0D 28 25 FE 0C 28 :B6 1 6DB8: C9 21 D1 01 06 04 CD AB :63 1 6DB0: C9 D6 30 FE 0A D8 D6 07 :A9 1 6DA8: 27 4F 7B CD 04 00 B1 4F :D7 1 6D98: 41 56 23 5E 23 7A CD 11 :98 1 6D78: FC 3A 08 5C F5 87 87 32 :B4 1 603115, 1 60 DATA 40,19,203,242,8,23,23 1 565 LET X=ELONG: GO SUB ROUND: 1520 LET ANG=ANG-SGN ANG*360: GO 1 560 LET SKE=SK*15: LET ELONG=(A 1500 REM CONV - 1 550 PRINT AT 17,1;" 1 545 LET BSAN=(ASN (NK*SIN (ASAN INK 3;" 1 540 GO SUB ATN: LET SDELTA=Z: L 1170 FOR J=1 TO DAY: READ D$: NE 1 535 LET Y=MK*SIN (ASAN*GR) 7 THEN LET NK=2 1 530 LET X=COS (ASAN*GR) 1165 LET NK=7: IF DAY=1 OR DAY= 1 525 LET ASAN=NSAN+ESAN+278.8335 1140 DATA " 1 520 LET ESAN=360/PI*0.016718*SI 1120 DATA " 1 515 LET MSAN=NSAN-3.762863: LET 1100 LET C=INT (D/7): LET DAY=1+ 1 510 LET NSAN=360*R/365.2422: LE 1090 LET M=M+1: LET C=INT (M*30. 1 500 PRINT AT 15,1;" 1 50 NEW 1 50 DATA 33,56,223,43,27,122,179 C383 C9 RET 1 495 LET X=MST: GO SUB ROUND: LE ;M;".";G: GO SUB 1070 1 490 LET MST=(5*(LN (PLRV*DIA/(B 1045 LET ME=M: LET GO=G 1 487 IF FAZ=0 THEN GO TO 510 .1,7 1 485 PRINT AT 13,1;" 1 480 LET FAZ=(1+COS ((CPL-PLLP)* =D 1 470 PRINT AT 11,1;" 1 465 LET DIAM=DR/DIA: LET X=DIAM 1000 REM 1 460 LET DIA=SQR (RV*RV+PLRV*PLR ,7: CLS : GO SUB STAR 1 455 PRINT SKR;" 1 450 LET SKR=(ABS SK-INT ABS SK) 600 IF ELONG<=10 THEN PRINT AT 1 445 LET SK=SK/15: PRINT AT 9,1; T 21,1; INK 2;" 1 441 REM SK- 1 440 GO SUB ATN: LET SK=Z 1 435 LET X=COS (CPL*GR) T 21,1; INK 2;" 1 430 LET Y=QK*MK-TAN (UPL*GR)*NK 580 IF SDELTA<SKE THEN PRINT A 1 410 LET ANGLE=ANGLE-SGN ANGLE*3 1 400 IF ANGLE>=0 AND ANGLE<=360 1 40 DATA 62,1,167,8,6,9,17,0,24 C381 EDB0 LDIR 1 40 DATA 33,27,239,243,62,195,50 1 375 GO TO 1020 1 370 PRINT ; INK 4;" 1 365 LET X=MOON: GO SUB ROUND: L 1 360 LET MOON=(1-COS (D/180*PI)) 1 350 IF D>=270 AND D<360 THEN P 1 35 DEC (HL) 1 340 IF D>=180 AND D<270 THEN P 1 330 IF D>=90 AND D<180 THEN PR 1 302 DATA 0.61521,355.73352,131. 425 LET XR=(ABS VK-INT ABS VK)* 1 301 DATA 0.24085,231.2973,77.14 415 PRINT AT 7,1;" 1 300 LET PAR=300: RESTORE PAR+N 411 REM VK- 1 30 NEXT f C37E 010018 LD BC,#1800 1 295 FOR I=1 TO N: READ A$: NEXT 410 LET VK=(ASN (SIN (UPL*GR)*M 1 294 RESTORE 250 K=SIN (CPL*GR) 1 292 PRINT AT 5,0;: INPUT AT 17, 400 LET MK=COS (23.441884*GR): 1 290 INPUT AT 0,3; INK 3;" 1 2801 JR Z,NEXT_B 1 280 DATA " 1 270 DATA " 1 260 DATA " 1 250 DATA " 1 247). 1 240 NEXT N T CPL=180+LP+CPL: LET ANG=CPL: G 1 230 PRINT AT 4+2*N,3; INK 4;N;" 380 LET CPL=(ATN (ERV*SIN (MS*G 1 23 NEXT_B INC HL 23296 - 1 220 FOR N=1 TO 7: READ A$ IF PLAE>1 THEN GO TO 9000 1 210058 AGAIN LD HL,#5800 1 210 RESTORE 250 370 LET ERV=PLRV*COS (PLJ*GR): 1 20F6 JR NZ,NEXT_A 23299 - 1 200 CLS : GO SUB DATA T MS=LP-DS 1 20 READ a: POKE f,a C37B 210040 LD HL,#4000 1 165B LD D,#5B 1 130 NEXT r 80 LET x=CORNa+(side*i/100) 1 120 NEXT i 70 FOR j=0 TO 175 1 115 LET RD=10 360 GO SUB ATN: LET DS=Z+LV: LE 1 110 PLOT 200*x,175-z 60 FOR i=0 TO 255 1 110 LET ROUND=9500 ): LET X=COS (RZ*GR) 1 110 BEEP .2,3 1 10F1 DJNZ AGAIN 1 105 LET STAR=4600 350 LET Y=SIN (RZ*GR)*COS (I*GR 1 100 NEXT a 1 100 LET x=r*x*(1-x) 50 PRINT #0;AT 1,13;"OBOI" 1 100 LET INORBIT=4500 ASN (SIN (RZ*GR)*SIN (I*GR)))/GR 1 10 FOR f=50000 TO 50051 C378 1138C7 LD DE,#C738 1 010000 LD BC,#0000 1 .1,7 C,AE 1 - 1 (which 1 (Y/N)?" 1 (Star Inheritance). 1 (PENETRATOR), 1 (BLAKE), 1 (27588) 1 (095) 446-55-90 1 #0052 6D80: 05 00 11 0A 00 21 60 02 :90 1 "Dizzy". 1 "Chart"CODE) 1 "7-th Guest" - 1 "," 1 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~ 1 Z-80, 1 XOR A 1 X-erase adventure ( 1 Table used: 70 from 183 1 Table used: 45 from 166 1 TURBO- 1 T-load adventure ( 1 T 1,2;A$;"-";K;".";ME;".";GO: BE 1 Steer L L 1 Shield H H 1 Select one of above please... 1 ScaleScale inc Start Link Displac Rotation Rot. inc Cycles 1 Save adventure ( 1 SNIPER RIFLE - 1 S - Set up 1 PUSH IY 1 PUSH IY 1 PC-REVIEW 1 P - Print screen 1 O TO 1020 1 Miss 8 4 1 MARSEC PISTOL - 1 MARSEC AUTO GUN - 1 M 4000 AUTO GUN - 1 M - Monitor 1 Laser H H 1 LOW PRIORITY: 1 LD IY,LEN - 1 LD R,A 1 LD IY,ADR3 - 1 LD IY,ADR2 - 1 LD IY,ADR1 - 1 L-50 LASER GUN - 1 L "32765",VAL "16": POKE VAL "49 1 Jamp - V 1 Infra V - 1 I) 1 HiSoft GEN Assembler ZX Spectrum 1 HIGH PRIORITY: GOTO (6) WAIT END 1 Green Beret 1 G - Magic button 1 Flare - - 1 FFH - 1 FFH - 1 FFFDH (65533) 1 FFDDH (65501) - 1 FEH - 1 FA34 C9 RET 1 FA32 EDB0 LDIR 1 FA30 0E04 LD C,#04 1 FA2F EB EX DE,HL 1 FA2E 09 ADD HL,BC 1 FA2B 010F00 LD BC,#000F 1 FA28 2A4F5C LD HL,(#5C4F) 1 FA25 323B5C LD (#5C3B),A 1 FA24 B0 OR B 1 FA22 E6EF AND #EF 1 FA1F 3A3B5C LD A,(#5C3B) 1 FA1C 11BE15 LD DE,#15BE 1 FA1A 0600 LD B,#00 1 FA17 32445C LD (#5C44),A 1 FA16 3C INC A 1 FA13 3A475C LD A,(#5C47) 1 FA10 22425C LD (#5C42),HL 1 FA0D 2A455C LD HL,(#5C45) 1 FA0C E5 PUSH HL 1 FA09 21761B LD HL,#1B76 1 FA08 E5 PUSH HL 1 FA05 210313 LD HL,#1303 1 FA04 E1 POP HL 1 FA00 ED7B3D5C LD SP,(#5C3D) 1 F918 20 FD 00 00 C9 FE 0E DA * * * 1 F910 17 38 FB 16 FE 00 00 15 1 F908 18 50 00 00 0E FE ED 78 1 F900 3E 20 F5 34 F1 CD 1D F9 1 F8F8 C6 38 07 D6 A5 C3 10 0C 1 F8F0 28 E9 FE 20 00 FE 7F 28 1 F8E8 DA FE 06 23 28 C1 FE 0D 1 F8E0 C9 21 7C F9 CB 7E 23 20 1 F8D8 BE 18 2A CD 4D F9 36 00 30 JP Z,SAVE 1 F8D0 17 17 17 77 C9 86 2B CB 20 1 F8C8 07 E6 0F CB 7E 28 06 17 1 F8C0 20 18 42 FE 40 38 02 D6 110-160; 1 F8B8 2B CB FE 2B CB FE C9 3E 1 F8B0 00 F9 7E E6 0F 20 F8 C9 1 F8A8 00 00 00 00 00 00 C9 CD 1 F8A0 AF 32 7E F9 3E 98 00 00 1 F898 2B 73 21 3C 00 22 7C F9 00180 RET 1 F890 2B 2B 2B 2B 11 E1 F8 72 00170 POP AF 1 F888 32 7B F9 F1 2A 53 5C 2B 00160 OUT (C),A 1 F880 F5 3E 85 32 7F 5C 3E 00 00150 XOR A 1 Expansion - 1 EXPLOSIVE - 1 ENTER - enter adventure ( 1 EFBE 00 NOP 1 EFBD E1 POP HL 1 EFBA CD005B CALL #5B00 1 EFB9 E5 PUSH HL 1 EA7F C9 RET C369 F5 PUSH AF 1 EA7D 10E3 DJNZ #EA62 C368 17 RLA 1 EA7C C1 POP BC C367 17 RLA 1 Drive M M 1 DE: POKE VAL "23627",NOT PI 1 D - Disk utility 1 CO3E C9 410 RET 1 CO3B 2243C0 400 LD (CHAR+4),HL 1 CO37 ED4341C0 390 LD (CHAR+2),BC 1 CO36 05 380 DEC B 1 CO1E 2222CO 300 LD (CHAR),HL 1 CO1B 10EB 280 DJNZ LOOP 1 CO17 19 240 ADD HL,DE 1 C366 17 RLA 1 C365 17 RLA 16 CALL SCROLL; 1 C364 08 EX AF,AF' 15 CALL SCROLL 1 C362 CBF2 SET 6,D 14 TITRE DI 1 C360 2813 JR Z,#C375 1 C35F B3 OR E 13 RET 1 C35E 7A LD A,D 12 LD (LINEINCHAR),A 1 C35D 1B DEC DE 11 XOR A 1 C35C 2B DEC HL 10 LD (COUNTLET),HL 1 C359 2138DF LD HL,#DF38 9 LD (STARTLET),HL 1 C356 110018 LD DE,#1800 8 INIT LD HL,TEXT 1 C354 0609 LD B,#09 1 C353 08 EX AF,AF' 7 RET 1 C352 A7 AND A 6 JR C,LOOP 1 C350 3E01 LD A,#01 5 RR A 1 C03F 00000000 420 CHAR DEFW 0000,0000,0000 1 C035 19 370 ADD HL,DE 1 C033 30FB 360 JR NC,L4 1 C032 04 350 INC B 1 C030 ED52 340 L4 SBC HL,DE 1 C02D 110A00 330 LD DE,#000A 1 C02C 0D 320 DEC C 1 C02A ED5A 310 ADC HL,DE 1 C028 30FB 300 JR NC,L3 1 C027 0C 290 INC C 1 C025 ED52 280 L3 SBC HL,DE 1 C022 116400 270 LD DE,#0064 1 C022 00000000 320 CHAR DEFW 0000,0000,0000 1 C021 C9 310 RET 1 C021 C1 260 POP BC 1 C01D ED433FCO 250 LD (CHAR),BC 1 C01D EB 290 EX DE,HL 1 C01C 05 240 DEC B 1 C01A ED5A 230 ADC HL,DE 1 C01A 23 270 INC HL 1 C019 E1 260 POP HL 1 C018 EB 250 EX DE,HL 1 C018 30FB 220 JR NC,L2 1 C017 04 210 INC B 1 C015 ED52 200 L2 SBC HL,DE 1 C015 1600 230 LD D,#00 1 C014 59 220 LD E,C 1 C013 19 210 ADD HL,DE 1 C012 29 200 ADD HL,HL 1 C012 11E803 190 LD DE,#03EB 1 C011 29 190 ADD HL,HL 1 C011 0D 180 DEC C 1 C010 D1 180 POP DE 1 C00F ED5A 170 ADC HL,DE 1 C00F E5 170 PUSH HL 1 C00E 29 160 ADD HL,HL 1 C00D EB 150 EX DE,HL 1 C00D 30FB 160 JR NC,L1 1 C00C E5 140 PUSH HL 1 C00C 0C 150 INC C 1 C00B 4F 130 LD C,A 1 C00A ED52 140 L1 SBC HL,DE 1 C009 E60F 120 AND #0F 1 C009 A7 130 ALD A 1 C008 7E 110 LOOP LD A,(HL) 1 C006 111027 120 LD DE,#2710 1 C006 0605 100 LD B,#05 1 C005 C5 110 PUSH BC 1 C003 110000 90 LD DE,#0000 1 C002 010000 100 LD DC,#0000 1 C001 E1 90 POP HL 1 C000 C5 80 H_D PUSH BC 1 C000 2122C0 80 D_H LD HL,CHAR 1 C000 70 ORG #C000 1 C000 70 ORG #C000 1 Bomb - 4 1 BREAK 1 Amm - 4 1 A - About Monitor 1 <NN> 1 90 NEXT t 1 90 FOR i=1 TO 80 40 INPUT "s=",side 1 9. AT - 1 80 PLOT x,y 1 80 NEXT i 30 INPUT "a=",CORNa,"b=",CORNb 1 8. SWAP - 1 7FH - 1 7FF0H (23765) - ZX 128 F - Line feed 10 1 7716017,131.5606494,62.2,7.597E- 1 70 NEXT t 1 70 LET y=.7*a*t*(t*t-7)+86 1 70 LET x=r*x*(1-x) 20 BORDER 0: PAPER 2: CLS 1 7. MESS - 1 6D60 ... (21 12 03), 1 6D5D 22336D LD (#6D33),HL 1 6D5A 217A6E LD HL,#6E7A 1 6D57 32326D LD (#6D32),A 1 6D55 3EC3 LD A,#C3 1 6D53 18E1 JR #6D36 1 6D52 E1 POP HL 1 6D51 72 LD (HL),D 1 6D50 23 INC HL 1 6D4F 73 LD (HL),E 1 6D4E E1 POP HL 1 6D4D EB EX DE,HL 1 6D4B ED52 SBC HL,DE 1 6D4A B7 OR A ( 1 6D47 11326D LD DE,#6D32 1 6D2C C34C01 JP #014C 6D50: 03 05 02 02 02 2C 06 04 :01 1 6D29 CD1803 CALL #0318 6D48: 03 02 02 11 02 02 03 02 :D6 1 6D27 10EC DJNZ #6D15 6D40: 0A 03 06 0C 0E 0C 02 02 :EA 1 6D25 DD23 INC IX 6D38: 22 02 14 17 02 06 02 07 :05 1 6D24 72 LD (HL),D 6D30: 02 52 12 02 08 0C 0D 04 :2A 1 6D23 23 INC HL 6D28: EC CD 18 03 C3 4C 01 22 :9B 1 6D22 73 LD (HL),E 6D20: EB E1 73 23 72 DD 23 10 :71 1 6D21 E1 POP HL 6D18: 16 00 19 E5 5E 23 56 19 :89 1 6D20 EB EX DE,HL 6D10: 00 DD 19 06 34 DD 5E 00 :E8 1 6D1F 19 ADD HL,DE 6D08: 3B 3B E1 E5 DD E1 11 27 :A7 1 6D1E 56 LD D,(HL) 6D00: 00 00 00 00 00 CD 52 00 :8C 1 6D1D 23 INC HL 1 6D1C 5E LD E,(HL) 1 6D1B E5 PUSH HL 1 6D1A 19 ADD HL,DE 1 6D18 1600 LD D,#00 1 6D15 DD5E00 LD E,(IX+0) 1 6D13 0634 LD B,#34 1 6D11 DD19 ADD IX,DE 1 6D0E 112700 LD DE,#0027 1 6D0C DDE1 POP IX 1 6D0B E5 PUSH HL 1 6D0A E1 POP HL 1 6D09 3B DEC SP 1 6D08 3B DEC SP 1 6D05 CD5200 CALL #0052 1 65 PRINT AT 3,21; INK 6;K;"." 1 60 PLOT x*75+127,y*75+87 1 60 LET x=a*5*(t*t-7)+120 1 60 INPUT " 1 60 FOR i=1 TO 80 10 REM : LET a=10,b=10,s=11 1 6. IF - 1 6. CANCEL 1 5FH - 1 5B18 C9 RET 237,176,201 1 5B17 FB EI 59,92,42,79,92,1,15,0,9,235,14,4, 1 5B15 ED5E IM 2 190,21,58,59,92,230,239,176,50, 1 5B13 ED47 LD I,A 92,58,71,92,60,50,68,92,6,0,17, 1 5B11 3E3A LD A,#3A 229,33,118,27,229,42,69,92,34,66, 1 5B0E 32FFFF LD (#FFFF),A DATA 237,123,61,92,225,33,3,19, 1 5B0C 3E18 LD A,#18 1 5B09 22F5FF LD (#FFF5),HL 1 5B06 32F4FF LD (#FFF4),A 1 5B04 3EC3 LD A,#C3 MIZE USR 64000: GO TO 1 5B03 F3 DI : READ y: POKE x,y: NEXT x: RANDO 1 5B00 211BEF LD HL,#EF1B CLEAR 64399: FOR x=64000 TO 64052 1 58. (3), 1 57. 1 56. WBNO - 1 55. DISC - ? 1 54. TAPE - ? 3 TO 0 MESS (19) WAIT END 1 53. CON(N) - ? AND CARR (3)) DROP (3) 1 52. ROOM - ? 6. IF (VERB (30) AND NOUN (3) 1 51. IN - ? END (LOOK, LOAD, SAVE...). 1 50. XOR - ? 5. IF (VERB (12)) PICT OKAY 1 50 LET z=z+1 1 50 LET y=COS (1.01*t/180*PI)+0 1 50 LET ATN=2000 340 LET RZ=(PLLP-LV): LET PLJ=( 1 50 INPUT " 1 50 FOR t=-4.4 TO 4.4 STEP .02 1 50 DEFM /eND/; F968 01 DD FF ED 79 F5 01 FD 1 5. IF (AT (1) AND CARR (4)) 1 5. END TURN 1.3. FIRE - 1 5. END - 1 5 LOAD "screen"CODE 16384 --------------------------------- 1 49. NO2 - ? 1 48. NO1 - 1 47. CSET - 1 40 LET x=SIN (0.99*t/180*PI)-0 1 40 LET K=31: LET M=12: LET G=1 300 LET Y=T+0.6583*SIN ((2*(T-J 1 40 LET CONV=1500 330 GO SUB INORBIT 1 40 FOR r=2.9 TO 4 STEP .0063 OBOI. 1 40 BRIGHT 1: INK 2: BEEP .1,1 1 40 RET F960 0D DB FE E6 80 20 F4 F1 1 4.3. BRIDGE ( 1 4.1. MISSILE BASE ( 1 4. SCANNER 1 4. IF (0 EQU?1) MESS (21) END 1 4. IF (VERB (10)) MESS (239) 1 4. HOLD - 1 3FH - 1 32" 1 32 LET ROUND=9500 .214*SIN (2*K*PI/180) 1 30 LET DATA=1000 96403,0.016718,1 1 30 FOR t=1 TO 1E30 STEP 0.5 30 LET x=.3: LET z=0 1 30 FOR a=.2 TO 2 STEP .25 1 30 CLS : DIM D(31) *SIN (V/180*PI): LET T=L+W+A-I+0 1 30 OUT (254),A F958 00 00 F5 CD 54 1F D2 00 1 3. NEXT UNIT 1 3. IF (1EQU?1 AND RES? (1) AND 1 3. IF (NO1<5 VERB (7)) GET 1 3. ADVE - 1 25 LET GR=PI/180 325 DATA 1.00004,98.83354,102.5 1 23 PRINT AT 17,5; INK 3;"@ 199 310 GO SUB INORBIT: LET PLLP=LP 1 22 PRINT AT 7,5; INK 6;" 1 22 PRINT AT 10,2; INK 4;" 1 21 PRINT AT 8,7; INK 6;" 1 20 PRINT AT 20,1; INK 7;"TSCHI 1 20 PRINT #0; INK 1;"MADNESS" 20 PRINT #0; INK 1;"CHAOS-1" 1 20 POKE 23606,88: POKE 23607,2 72.7363288,0.0463232,19.21814,0. 1 20 POKE 23606,88: POKE 23607,2 63: LET ANGLE=K: GO SUB 400: LET 1 20 POKE 23606 1 20 LD A,2 F950 05 F9 3E 00 C3 05 F9 00 1 2. NOUN - 1 2. MOONBASE ASSAULT ( 1 2. INFO 1.8. SCANNER 1 2. IF (RES?(1) AND RES? (2)) 1 2. IF (NO1=0 AND VERB (7)) 1 1FH - 1 1FFDH (08199) - 1 17. SAVE - 1 16. LOAD - 1 15. LOOK - 1 15 RANDOMIZE USR 15619: REM : 93741,113.4888341,165.6,1.74E-4 1 14. QUIT - 1 13. RESE - 1 12. SET - 1 12 RANDOMIZE USR 15619: REM : 80 IF M>=3 THEN GO TO 100 1 11. RES? - 1 10. SET? - 1 10 BORDER 4: PAPER 1: CLS 1 10 BORDER 1: PAPER 1: INK 6: C : LET ANGLE=L: GO SUB 400: LET L 1 10 BORDER 1: PAPER 1: INK 4: C GO SUB 80 1 10 BORDER 1: PAPER 1: INK 4: C 305 DATA 29.45771,165.322242,92 1 10 BORDER 0: PAPER 0: INK 4: C 10 BORDER 0: PAPER 0: INK 4: C 1 10 ORG 40000 F948 00 00 C9 F1 C9 3E 0D CD 1 1.7. PICK UP - 1 1.6. DROP - 1 1.5. CHANGE - 1 1.4. LOAD - 1 1.3.5. END FIRE - 1 1.3.4. THROW - 1 1.3.3. AUTO SHOT - 1 1.3.2. SNAP SHOT - 1 1.3.1. AIM SHOT - 1 1.2. OPEN / CLOSE - 1 1. VERB - 1 1. THE ASSASINS ( 1 1. SELECT 1.7. PICK UP 1 1. IF (VERB (20)) MESS (249) 1 1. IF (RES? (6)) SET (6) TEXT 1 1 BORDER 0: PAPER 0: INK 0: C C375 10DF DJNZ #C356 1 1 2 3 4 5 6 1 00500 LD (BUF),A 1 00490 LD A,57 1 00460 JR END 1 00330 LD A,54 1 00300 JP #F1B3 1 00290 CALL #F503 1 00260 CP 67 1 00250 JR Z,SAVEF 1 00240 CP 70 1 00230 CALL #F652 1 0 - Continue programm 1 ... ( 1 ... " 1 ... 1 ... 1 ... 1 (USH.corp) 1 #AFA9 LD (#D51F),A 1 #6D05...#6D28 - 1 "SPOTTED BY < 1 "HAPPY 1 "C M Sinclair Micro Kit Co" 1 "23627",VAL "255": RANDOMIZE USR 1 VAL "32765",VAL "19" 1 VAL "24832" 1 START JR NZ,XX 1 NN+3 11 08 00 LD DE,#0008 1 LPRINT CHR$ 27+"l"+CHR$ 40. 1 CB7F BIT 7,A 1 =M: GO SUB 400: LET M=ANGLE 1 78 LD A,B 1 391 REM UPL- 1 315 REM 1 307 DATA 164.79558,260.3578998, 1 270 LET Q=151.950429-0.0529539* 1 1A LD A,(DE) 1 1990 MOA B-Disk version 1 13 INC DE 1 1 GO TO 20 -4 1 1 GO TO 20 250 LET L=13.176396*F+64.975464 1 0B DEC BC 1 (C) 1988 GREMLIN GRAPHICS 1 'CLOSE' 1 ~~~~~~~~~~~~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~~~~~~~~~ 1 [5] 1 [4] U-96 - 1 Verbs ( 1 UNIT - 1 T - BORDER 1 STRENGTH - 1 Room description ( 1 R - 1 POP HL 1 Messages ( 1 MORALE - 1 M 7000 BLASTER - 1 Low priority conditions. 28. GOTO - 1 LOOP C008 1 LD A,R - 1 L3 C025 L4 C030 1 L1 C00A L2 C015 1 High priority conditions. 25. 1 High priority conditions ( 1 F930 5C DD BE 00 DA 4B F9 3E 1 F928 7E 00 DD 34 00 DD 21 7F 1 F920 42 F9 F5 DD 21 7B F9 DD 1 F - FILL 1 E6 18 AND 18H 1 E6 07 AND 7 1 D - DOTS 1 CURSOR - 1 CHAR C03F H_D C000 1 CHAR C022 D_H C000 1 C6 40 ADD A,40H 1 C36D EB EX DE,HL 1 C36C B6 OR (HL) 1 C36B EB EX DE,HL 1 B - BRIGHT 1 Adverbs ( 1 84 ADD A,H 1 8. Steering Unit - Low - 1 6D45 EB EX DE,HL 1 6D44 56 LD D,(HL) 1 6D41 E5 PUSH HL 1 6D40 D5 PUSH DE 1 6D3C 2817 JR Z,#6D55 1 6D3A 7A LD A,D 1 634041 1 6. Main Driver Power - Med - 1 6. CANCEL - 1 44. WEIG - 1 40 IF PEEK VAL "49152"=VAL "30 1 36. PRIN - 1 31. AND - 1 308 READ TP,EP,W,EC,AE,I,LV,DR, 1 30 POKE VAL "23760",PEEK VAL " 1 29. LIST - 1 26. LF - 1 248 - "You are carring too 1 247 - "You can't see that". 1 244 - "Are you sure (Y/N)". 1 2220 DJNZ BOARD ; 1 1986- 1 1. SELECT - 1 00090 OUT (C),A 1 00080 LD BC,FFDD 1 00070 POP AF 1 00060 JR NZ.L1 1 .......................... 1 -1": 1 "2" - 1 "1" - 1 ")" (SS+9) - 1 "'" (SS+7) - 1 ~~~~~~~~~~~~~~~~~~~~~ om?..." ( 1 ~~~~~~~~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~~~ 1 Verbs. Adverbs. Noun. "Which picture goes in this ro- 1 V V 1 V - 1 T - Test disk 1 F - Format disk 1 END 1 D - Disk drive A/B 1 C - Catalogue disk 1 BEGIN <NN> 1 40 RANDOMIZE USR 49180 1 2. 1 164170, 1 0 - Previous menu 1 .... ;<--- 1 -5": 1 - - 1 ~~~~~~~~~~~~~~~~~~~ "Okay". 1 Russia, Moskow, 12.10.95. 1 NN+4 CALL HEADER ; 1 NN+0 RES 2,(IX) ; 1 MM+4 CALL HEADER ; 1 MM+0 SET 2,(IX) ; 1 9C42 IN A,(#FE) 1 9C40 LD A,#BF 1 9403 DI 30 FOR a=23296 TO 23320 : READ 1 6BCD EI 10 FOR a=61369 TO 61374 : READ 1 6BC4 DI 1 5. 1 3. 1 2480 DEC DE ; 1 1740 LD A,H ; 1 1690 L9 LD A,E ; 1 ~~~~~~~~~~~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~~~~ 1 || 1 V - Form feed 12 1 Room description. 100=1 1 New turbo algoritms..90% 1 New turbo algoritms..10% 1 LD HL,START+1 1 LD BC,LEN - 1 INFORMATION FOR BRAKERS 1 CF RST 8 1 C9 RET 1 A>RUN "MASM128K" <Enter> 1 9.CREDITS & COMING SOON: 1 8. 1 7. 1 5. 1 4- 1 3E78 LD A,#78 1 3E1B LD A,#1B 1 3E01 LD A,#01 1 1.5. CHANGE 1 1.3. FIRE 1 0 - Previous menu 1 /\ 1 ............................ 1 . RET I s: POKE a,s: NEXT a 1 . RET "BETA-BASIC 1.0". 1 . LD HL,(#6BCD) 1 . LD (#F7F7),HL 1 . LD A,#C3 s: POKE a,s: NEXT a 1 . EI 1 ----------------------- 1 * * * 1 ~~~~~~~~~~~~~~~~~ G - GRID 1 ~~~~~~~~~~~~~~~~~ A - ? 1 ~~~~~~~~~~~~~~~~~ 1 ~~~~~~~~~~~~~~~ POP DE 1 TSCHIRNHAUSEN. 1 T-load adventure. L - LINE 1 66 1 44 1 3. 1 1- 1 * * * 1 * * * 1 RET Z 1 RANDOMIZE USR 23600 1 OR C 1 LD A,B 1 LD (HL),A 1 LD BC,#FEFE 34, 248, 247, 251, 201. 1 INC HL 1 IN A,(C) ********************************* 1 F7F9 8A 1 F7F7 FB EI 1 BIT 7,A 1 6BC4 DI 1 29 1 . EI 1 *AIG* & KSA SOFTWARE 1 * * * T N=360*F/365.2422: LET ANGLE=N: 1 "SCORPION-256" 00130 SET 5,A 1 ~~~~~~~~~~~~~~ P - PAPER 1 ~~~~~~~~~~ 1 ~~~~~~~~ C373 18E7 JR #C35C 1 Z 1 Save adventure. I - INK 1 RRCA F7FB RET I 1 RET F7F7 JP #8A87 1 LD A,(#D51F) F7FA EI 1 LD (nn),HL . LD HL,#8A87 1 JR C,#AFA9 1 JP Z,... . LD (#F7F7),A 1 CALL #AAFD 1 17 1 1. O 1 . . . 1 . . . 1 . RET 1 . LD (#F7F8),HL 1 . LD (#F7F7),HL 1 . EI 1 *AIG* productions: 1 * * * 1 "Ip256" for 00120 XOR A 1 RRA 1 RET JR Z,... 1 PLANETS. .00095493,0.0484658,5.202561,1.3 1 MADNESS. CHAOS. 1 LD IX,#6000 1 LD DE,#A000 1 LD A,#FF LD A,(nn) 1 JR #C,9C40 GLUMSY). 1 CALL #04C2 DEC A 1 4. 1 21 1 * * * 1 "Chart2". "Chart4". 1 ~~~~~~~~~~~~~~~ 1 ~~~~~~~~ 240 - "What now...". 1 ~~~~~~~ 1 TR-DOS D - Disk drive A/B 1 OR L 1 LD HL,(nn) 1 LD A,H 1 JR Z,... 1 Graphics. 239 - "You are carring". 1 3 INVENTORY ENTER, 1 3 I room #...". 1 23 1 2 WEST "Object #... is ..." 1 2 W 1 1 NORTH 1 1 N objects number?...) 1 * * * 1 "Chart1". "Chart3". 1 ~~~~~~ 1 ~~~~~ 1 TITRE 1 MOON. 240 LET J=N+E+278.83354: LET AN 1 ENTER. ~~~~~~~~~ 1 COPYRIGHT BY 1 6. 1 5. 1 128 K 1 ... 1 ... 1 W - Page length 0 1 CREDITS: 1 4. 1 34 1 50 1 40 ******************************************* 1 30 * - Compression RAM - Written By M.Stinov * 1 20 * Copyright (C) SpySoft KHABAROVSK-1993 * 1 10 ******************************************* 1 73 1 ............................. 1 590 IF SDELTA>SKE THEN PRINT A 1 83 1 20 * (C) SpySoft PROGRAM "HEX/DEC" * 1 20 * (C) SpySoft PROGRAM "DEX/HEC" * 1 - 80 - 1 R - Reset 1 9 1 ATN EP .7,7: PAUSE 0: BEEP .1,7: BOR 1 L - String width 0 1 - 96 - 1 - 95 - 1 - 94 - 1 - 93 - 1 - 92 - 1 - 91 - 1 - 90 - 1 - 9 - 1 - 89 - 1 - 88 - 1 - 87 - 1 - 86 - 1 - 85 - 1 - 84 - 1 - 83 - 1 - 82 - 1 - 81 - 1 - 8 - 1 - 79 - 1 - 78 - 1 - 77 - 1 - 76 - 1 - 75 - 1 - 74 - 1 - 73 - 1 - 72 - 1 - 71 - 1 - 70 - 1 - 7 - 1 - 69 - 1 - 68 - 1 - 67 - 1 - 66 - 1 - 65 - 1 - 64 - 1 - 63 - 1 - 62 - 1 - 61 - 1 - 60 - 1 - 6 - 1 - 59 - 1 - 58 - 1 - 57 - 1 - 56 - 1 - 55 - 1 - 54 - 1 - 53 - 1 - 52 - 1 - 51 - 1 - 50 - 1 - 5 - 1 - 49 - 1 - 48 - 1 - 47 - 1 - 46 - 1 - 45 - 1 - 44 - 1 - 43 - 1 - 42 - 1 - 41 - 1 - 40 - 1 - 4 - 1 - 39 - 1 - 38 - 1 - 37 - 1 - 36 - 1 - 35 - 1 - 34 - 1 - 33 - 1 - 32 - 1 - 31 - 1 - 30 - 1 - 3 - 1 - 29 - 1 - 28 - 1 - 27 - 1 - 26 - 1 - 25 - 1 - 24 - 1 - 23 - 1 - 22 - 1 - 21 - 1 - 20 - 1 - 2 - 1 - 19 - 1 - 18 - 1 - 17 - 1 - 16 - 1 - 15 - 1 - 14 - 1 - 13 - 1 - 12 - 1 - 11 - 1 - 10 - 1 RANDOMIZE USR 40000. 1 AND AVAI (13)) 13 SWAP 14 CTR (0) 1 6D58: 42 0D 03 0F 21 04 0B 02 :58 1 5", " 1 17 LD HL,(COUNTLET) 1 0 1 - 1 - 1 (#0DD9). 1 "-" 1 " 1 j 1 GLE=J: GO SUB 400: LET J=ANGLE 1 80*PI)/PI 1 4 IN A,(#FE) 1 041819,100.2520175,196.74,1.994E 1 00520 CP 255 1 00480 JR C,END 1 00420 JR Z,END 1 00280 END LD A,13 1 00220 DEFB 13.0 1 00210 DEFM /Code or File?/ 1 00070 JP Z,CAT 1 GO SUB 400: LET N=ANGLE 1 AE XOR (HL) 1 304 DATA 11.86224,146.966365,14 1 23 INC HL 1 210 LET F=R+(H+0.016666)/24: LE 1 20 DATA 229,205,0,91,225,0 1 18ED JR NEXT_A 1 185 FOR J=1 TO DAY: READ D$: NE 1 170 NEXT i 1 160 NEXT j 1 150 IF f=0 THEN PLOT INK 1;i, 1 140 LET f=d-e 1 130 LET e=INT d 1 120 LET d=c/2 1 110 LET c=INT z 1 100 LET z=x*x+y*y 1 100 LET M=M+1: LET C=INT (M*30. 1 "23760": RANDOMIZE USR VAL "248 1 M - MERGE 1 LOCAL: 1 F978 79 F1 C9 0E 3C 00 17 00 1 F940 F9 F1 DD 21 7B F9 DD 36 1 E6 18 AND 18H 1 C370 08 EX AF,AF' 1 C36A A6 AND (HL) 1 90 LET y=CORNb+(side*j/100) 1 8. 1 6D35 09 ADD HL,BC 1 33. HERE - 1 3. 1 251 - "It is dark, you cannot 1 1. IF (VERB (3) AND SET? (5)) 1 1. 1 00140 OUT (C),A 1 00050 AND 128 1 00005 ORG #F95A 1 - 1 "_" (SS+0) - 1 "SPACE" - 1 "9" - 1 "8" - 1 "0" - 1 "(" (SS+8) - 1 "!" (SS+1) - 1 2. 1 M - Monitor 1 XOR (HL) 1 * * * 1 Messages. 1 3. 1 ~~~~~~~~ 1 1 1 1 1 1 1 1